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Lista de propiedades 


N Logo a las variables y a los 


procedimientos podemos. 


asociarles una lista de pro- 
piedades. 

¿Qué es una lista de 
propiedades? 

La estructura es la si- 
guiente:' 


[ propiedad 1 valor 1 propiedad 2 valor 2 ... ] 


Las listas de propiedades contienen pa- 
res de elementos formados por una propiedad 
y su valor. 

Una lista de propiedades con un solo 
elemento es: 


[ LIBRO PEQUEÑO ] 
propiedad 1 — LIBRO 
valor 1 — PEQUEÑO 
Una con dos pares de elementos 


es. 
[ PADRE JOSE MADRE MARIA ] 


propiedad 1 — PADRE 
valor 1 — JOSE 
propiedad 2 — MADRE 
valor 2 — MARIA 


No es posible asociar una lista de pro- 
piedades a una variable que no tenga ningún 
valor. 


NOTA: El Logo del SPECTRUM noc dis- 
pone de la posibilidad de asociar listas de pro- 
piedades a las variables y/o a los procedi- 
mientos. 


Las listas de propiedades son gestiona- 
das por diversas primitivas, veamos alguna de 
ellas. 


PONPROP nombre propiedad objeto 


nombre: es el nombre de la variable o del pro- 
cedimiento al que vamos a asociar una propie- 
dad. 

propiedad: es el nombre de la propiedad e 
asociar. Si esta propiedad no está en la lista 
de propiedades del nombre especificado se 
incluirá en ella en el primer lugar. 

objeto: es el valor que toma la propiedad espe- 
cificada. ' 


? HAZ'A'CASA 
? PONPROP :A "TELEFONO “ROJO 


Asociamos a la variable A la propiedad 
"TELEFONO con el valor "ROJO. 

Si a la misma variable queremos darle 
más propiedades, hacemos lo mismo. 


? PONPROP :A “BALCON "EXTERIOR 


Para comprobar que la variable A tiene 
asociadas estas propiedades con sus respec- 
tivos valores, utilizamos la primitiva: 


? PROP nombre propiedad 


Esta primitiva devuelve el valor de la 
propiedad especificada de la lista asociada al 
nombre indicado: 


nombre: es el nombre de la variable o del pro- 
cedimiento del que vamos a consultar la lista 
de propiedades. 
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propiedad: es el nombre de la propiedad que 
queremos consultar. 


Si la propiedad que especificamos no 
tiene valor, la primitiva PROP devuelve la lis- 
ta vacía. 

Si deseamos saber los valores de las 
propiedades asociadas a la variable A en los 
ejemplos anteriores, teclearemos: 


? ESPROP :A “TELEFONO 
ROJO 


ROJO es el valor de la propiedad TELE- 
FONO. 


? ESPROP :A "BALCON 
EXTERIOR 


? ESPROP :A "TERRAZA 


En la pantalla no aparece nada, pues la 
variable A no tiene asociada ninguna propie- 
dad con el nombre TERRAZA. 

Para cambiar el valor a una propiedad 
determinada, por ejemplo, a BALCON, teclea- 
remos: 


? PONPROP :A "BALCON “INTERIOR 


Comprobemos que el valor actual de la 
propiedad BALCON es INTERIOR. 


? PROP :A "BALCON 
INTERIOR 


Si borramos del espacio de memoria 
una variable que tiene una lista de propieda- 
des asociadas, las perdemos. 

Un motivo de error es consultar la lista 
de propiedades de una variable que no tiene 
valor. Logo muestra el mensaje: 


nombre NO TIENE VALOR 
Sigamos:con los ejemplos. 


? PARA'"Al 

> HAZ "A [ ME ENCANTAN LAS ZA- 
NAHORIAS ] 

> ES:A 

> FIN 


Ahora le asignamos al procedimiento 
Al las propiedades que deseemos. 


? PONPROP "Al "COMIDAS “BUENAS 
? PONPROP'A1 "ALIMENTOS NATU- 
RALES 


? ESPROP "Al "COMIDAS 
BUENAS 


? ESPROP "Al “ALIMENTOS 
NATURALES 


El valor de una propiedad puede ser 
cualquier objeto Logo, veamos cuando el ob- 
jeto es una lista. 


PARA Al 

HAZ "A "FAMILIA 

PONPROP :A "PADRE [ JOSE ANTO- 
NIO ] 

PONRPOP :A "MADRE [ MARIA LUI- 
SA ] 

ES PROP :A “PADRE 

ES PROP :A "MADRE 

FIN 


Si ejecutamos este procedimiento: 
? Al 
En la pantalla aparece: 


JOSE ANTONIO 
MARIA LUISA 


YN ZN NE 


La orden DEVUELVE 


Ya vimos que el LOGO disponía de una 
orden con la que podíamos detener o in- 
terrumpir un procedimiento que se estaba eje- 
cutando, devolviendo el control, bien al pro- 
cedimiento que lo había llamado, bien al nivel 
superior (al usuario). 

Esta orden es: 


ALTO 

Otra similar de que dispone el LOGO y 
cuya función es similar a ALTO es: 

DEVUELVE objeto 
y en su forma abreviada: 

DEV objeto 

Esta primitiva detiene la ejecución del 
procedimiento en que se encuentra y devuel- 
ve a su vez el objeto que se especifica. 


Si definimos el siguiente procedimien- 
to: 


? PARA EJEMPLO 
> HAZ'C:A*:B 


> SI:C > 10[DEV:C] 
> HAZ'A:A+ 1 

> HAZ'B:B+2 

> EJEMPLO 

> FÍN 


e inicializamos las variables; 

? HAZ'AO 

? HAZ'BO 
y ahora introducimos: 

? ESCRIBE EJEMPLO 
en la pantalla obtendremos: 

18 

El procedimiento se ejecuta hasta que 
se interrumpe cuando la condición estableci- 
da se cumple y ejecuta la orden DEV. 

El número que se obtiene corresponde 
al valor que tiene la variable C, que es el que 
se ordena que se devuelva en el procedimien- 
to EJEMPLO. Por eso, al ordenar que se escri- 
ba EJEMPLO, lo que se escribe es el dato que 


devuelve el procedimiento. 
Si introducimos: 


? ESCRIBE 5 + EJEMPLO 
en la pantalla obtenemos: 
23 


Este número corresponde al valor que 
devuelve el procedimiento EJEMPLO sumado 
a cinco. 

Otro ejemplo que nos puede ayudar a 
comprender esta orden es el siguiente: 


tos: 


? PARAA 
> DEV "CONTRO 
> FIN 


? PARAB 
> DEV "LADOR 
> FIN 


Si ahora introducimos: 
ESCRIBE PALABRA AB 


en la pantalla obtenemos: 
CONTROLADOR 


Definimos los siguientes procedimien- 


Ordenamos que se escriba, formando 
una palabra, dos objetos. Pero en este caso los 
dos objetos son nombres de procedimientos. 


Cada uno de estos procedimientos de- 
vuelve una palabra determinada, que son los 
datos que utiliza la orden: 


? ESCRIBA PALABRA A B 


El resultado sería el mismo si hubiése- 
mos introducido: 


? ESCRIBA PALABRA "CONTRO "LA- 
DOR ye 


Algo parecido podemos realizar con las 
listas. 


Si definimos los siguientes procedi- 
mientos: 


? PARAC 
> DEV [ EN UN LUGAR ] 
> FIN 


? PARAD 
> DEV [ DELA MANCHA ] 
> FIN 


y ahora introducimos: 
? ESFRASE CD 
en la pantalla aparecerá: 
EN UN LUGAR DE LA MANCHA 


La frase se forma con los datos que 1e- 
vuelven los procedimientos que se especifi- 
can (el procedimiento C devuelve EN UN LU- 
GAR, y el procedimiento D, DE LA MANCHA). 

Aquí tienes otro ejemplo curioso. 

Definimos el procedimiento CALOR 


? PARA CALOR 
> DEV [ MUCHO PRIO ] 
> FIN 


Si ahora introducimos: 
? ESCRIBE FRASE "HACE CALOR 
en la pantalla aparece la siguiente frase: 
HACE MUCHO FRIO 
La frase se forma con la palabra HACE 


y con la lista que devuelve el procedimiento 
CALOR, MUCHO FRIO. 
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- Cuadro resumen 


— PONPROP nombre propiedad objeto 


Asocia a nombre la propiedad con el 
valor objeto especificado. 


— PROP nombre propiedad 


Esta primitiva devuelve el valor de la 
propiedad especificada de la lista asociada al 
nombre indicado. 


— DEVUELVE objeto 


Interrumpe la ejecución del procedi- 
miento en que se halla y devuelve como re- 
sultado el objeto que se especifica. 


Ejercicios 


1. Define los procedimientos necesarios para 
realizar el siguiente juego: 


— El jugador deberá escoger una letra 
cualquiera, la que prefiera. 


— Una vez introducida la letra deberá in- 
troducir palabras que empiecen por dicha 
letra, teniendo en cuenta: 


Se concederá un tiempo de espera para 
introducir cada palabra. 
Se podrán introducir hasta 10 palabras. 

. Si la palabra introducida no empieza por 
la letra elegida o si tras la espera no se ha 
tecleado nada, en la pantalla aparecerá el 
mensaje TIEMPO. 


— Al final del juego se informará de los 
puntos obtenidos, y se ofrecerá la oportu- 
nidad de volver a jugar. 


2. Dibuja una calculadora. 


3. Intenta realizar el siguiente dibujo: 


5. 


Fig. 1. 


Define los procedimientos necesarios para 
clasificar en dos columnas diferentes los 
números pares e impares que quieras in- 
troducir. 


¿Son correctas las siguientes órdenes?: 


— ? PARA “Al 

HAZ "A "CENICERO 
PONPROP :A “GRANDE “RICO 
ES PROP :A "GRANDE 

FIN 


PARA A2 

HAZ “A "JARDIN 

HAZ "B PONPROP :A "FLOR 
"AMARILLA 

FIN 


PARA A3 

PONPROP "A3 "MUSICA “POP 
ES PROP "A3 "MUSICA 

FIN 


PARA A4 
PARA A4 
HAZ"A0 
DEV :A 
FIN 


| 
VENETO MY YENES NEON 


? PARA AS 
> DEV “PRONTO 
> FIN 


? ESPALABRA "HASTA A5 
? DEV [ NO ES POSIBLE ] 


Solución a los ejercicios 
l 
Definimos el procedimiento ] para: 


inicializar la pantalla 

leer la letra elegida 

ejecutar el procedimiento JUEGO (par- 
te central del juego) 
ofrecer la oportunidad de volver a jugar 


PARA ] 

PT 

BT 

PONCURSOR [51] 

ESCRIBE [ ELIGE UNA LETRA... ] 
PONCURSOR [ 25 1] 

HAZ "TLC 

PONCURSOR [ 25 1] 

ES :T 

JUEGO 5:TO , 

PONCURSOR [ 2 22 ] 

ES [ ¿QUIERES JUGAR OTRA VEZ? 
(S/N)] 

PONCURSOR [ 37 22 ] 

HAZ "S LC 
SI:S="S[J][ BT ALTO ] 

FIN 


El procedimiento JUEGO tiene tres en- 
tradas: 


VVWVWV VVVVWVVVVVVV" 


X posición del cursor 
T letra elegida 
P total puntos 


Este procedimiento se ejecutará 10 ve- 
ces, desde que x = 5 hasta que x = 14, 


? PARA JUEGO :X :T :P 

> PONCURSOR LISTA 1 :X 

> ESPERA 20 

> SI TECLA? [ HAZ “"P CORREC :T :P ] 
[ ES "TIEMPO ] 

> SI :X = 14 [ PONCURSOR [ 15 7 ] ES 
(FRASE [ TOTAL PUNTOS =) :P) 
ALTO ] [ JUEGO (:X + 1) :T:P ] 

> FIN 


El jugador debe tener un poco de tiem- 
po para pensar, por tanto, establecemos una 


espera (ESPERA 20); si tras la espera se de- 
tecta que se han introducido caracteres, se 
ejecuta el procedimiento CORREC, si no, en la 
pantalla aparece el mensaje TIEMPO. 

El procedimiento CORREC tiene dos 
entradas 


T letra elegida 
P total puntos 


? PARA CORREC :T :P 

> HAZ "A LP 

> SI VACIO? :A [ PONCURSOR LISTA 
1 (=1 + ULTIMO CURSOR) ES "TIEM- 
PO ] [HAZ 'C PRIMERO :A SI :C =:T 
[HAZ 'P:P+1]] 

> DEVUELVE :P 

> FIN 


Este procedimiento se encarga de: 


— leer la palabra; 

— controlar que no sea la palabra va- 
cía, en cuyo caso se considera error; 

— comprobar si la primera letra de la 
palabra es igual a la letra elegida; 

— incrementar en 1 el contador de 
puntos cuando proceda; 


y 
— devolver al procedimiento JUEGO el 
valor de marcador. 


Este valor, que devuelve el procedi- 
miento CORREC al procedimiento JUEGO a 
través de la primitiva DEVUELVE, es almace- 
nado en la variable P. 


Empecemos a jugar 


de 


Hg. 2. 
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(Pulsamos la tecla A) 
y todas las palabras que podamos que empie- 
cen por A, 


Fig. 3. 


No está mal, hemos conseguido 9 pun- 
tos, 

Si deseas volver a jugar, contesta a la 
pregunta afirmativamente (pulsa la tecla S). 


2: 


Dibujamos una calculadora con este procedi- 
miento: 


PONPOS [ -80 44 ] 

PONRUMBO 90 

BL 

REPITE 2 [ AV 160 GD 90 AV 80 GD 
90] 

0 

PONPOS [ -70 39 ] 

BL 


REPITE 2 [ AV 65 GD 90 AV 15 GD 
90 ] 


VVWVV VVVV VVVVVVV>” 


REPITE 4 [ REPITE 4[ AV 15 GD 90 
]AV15] 

> HAZ "A FRASE [789 / MRC ] 

> HAZ 'BFRASE[456*M-] 

> HAZ '"CFRASE[123-M+] 
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HAZ 'DFRASE[0.+=] 
PONCURSOR [ 18 12 ] 
ESCRIBE :A 
PONCURSOR [ 18 13 ] 
ESCRIBE :B 
PONCURSOR [ 18 14 ] 
ESCRIBE :C 
PONCURSOR [ 20 15 ] 
ESCRIBE :D 

HAZ 'A "ON 
PONCURSOR [ 11 13] 
ESCRIBE [ 11 13] 

HAZ "A "OFF 
PONCURSOR [ 11 14] 
ESCRIBE :A* 
PONCURSOR [ 16 9] 
ESCRIBE "523 

FIN 

Ejecuta el procedimiento tecleando: 


O: 


vv 


VVUVWVVVVVVVVVVVYV 


Fig. 4. 
3: 


Para realizar el dibujo del globo vamos a ir de- 
finiendo procedimientos que dibujan diferen- 
tes partes de éste. 

En primer lugar, definimos el que dibu- 
ja lo que es el globo en sí: 


? PARAA 

> SL 

> PONPOS [ -10 10 ] 
> BL 

> GI20 AV 60 

> GD 10 


REPITE 21 [ AV6 GD 10] 
AV 60 

PONRUMBO 270 

AV 24 

FIN 


procedimiento B es el que dibuja, 


> 
> 
> 
> 
> 


junto al C y el D, las franjas que tiene el globo: 


PARA B 


L , 
PONPOS [ -10 10 ] 
C 40 
SL 
PONPOS [ -3 10 ] 
C 43 


SL 

PONPOS [ 14 10] 

D 40 

SL 

PONPOS >D43 [7 10] 
FIN 


C dibuja las franjas-de la derecha: 


? PARAC:V 

> PONRUMBO 0 
> BL 

> GIl10 AV 60 
> GD30 AV :V 
> FIN 


D dibuja las franjas de la izquierda: 


? PARAD:V 
> PONRUMBO 0 
> BL 

> GD10AV 60 
> GI 30 AV :V 
> FIN 


El procedimiento E es el que va a dibu- 


VVVWVVVVVVVVV> 
uN 


jar la cuerda que une el globo con la cesta: 


? PARAE 

> SL 

> PONPOS [ -10 10] 

> PONRUMBO 0 

> REPITE 6 [ BL RE 7 AV 7 GD 90 SL 
AV5GI90] 

> FIN 

F dibuja la cesta: 

? PARAF 

> SL 


> PONPOS [ -18 -30 ] 
> PONRUMBO 0 
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BL 

REPITE 2[ AV 32 GD 90 AV 41 GD 
90 ] 

AV 32 GD 90 
AV 2 Gl 90 

GI 13 AV 65 

SL 

PONPOS [ 21 2] 
GD 26 

BL 

AV 65 

FIN 


VVWVWVVVVVV VV 


Una vez que tenemos todos los procedi- 


mientos necesarios definidos, los englobamos 
en GLOBO para realizar el dibujo completo e 
inicializar el proceso: 


cir: 


4: 


? PARA GLOBO 
BP 

oT 

A 

B 

E 

F 

FIN 


VVVVVVV 


Para ver el dibujo tenemos que introdu- 


? GLOBO 


En primer lugar, definimos el procedimiento 
que va a dibujar la tabla donde se van a ir es- 
cribiendo los números que se introduzcan: 


VVVVVVVVV VVVV> 
un 


PARA A 

SL 

PONPOS [ -105 -50 ] 
BL 


REPITE 2[ AV 140 GD 90 AV 210 GD 
90 ] 


L 
PONPOS [ -8 -50 ] 
BL 


AV 140 RE 16 

GD 90 RE 97 

AV 210 
PONCURSOR [ 8 4] 
ES [ NUM. PARES ] 
PONCURSOR [ 20 4 ] 
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> ES[ NUM, IMPARES ] 
> FIN 


El procedimiento B es el que solicita un 
número: 


PARA B 

BT 

PONCURSOR [ 2 21 ] 
ES [ INTRODUCE EL NUMERO QUE 
QUIERAS ] 

HAZ"A LL 
SI:A=[][B] 

HAZ "A UL:A 

E 

B 

FIN 


VVWVWVVV VVV> 


Una vez que el número se ha introduci- 
do, se pregunta si la lista es vacía, lo que sig- 
nifica que sé ha pulsado RETURN sin introdu- 
cir ningún valor. De ser así, vuelve a ejecutar- 
se el procedimiento. 


Si se ha introducido un número, se eje- 
cuta el procedimiento C: 


? PARAC y 
> HAZ "B RESTO :A 2 
> SI:B = 0 [PONCURSOR LISTA 
12 :P ES :A ] [ PONCURSOR LISTA 


24 :FES:A] 
> SIF=16[ OTRA ][HAZ'F:F+1] 
> FIN 


En este procedimiento se asigna a la va-. 


riable B el resto de la división del número in- 
troducido (variable :A) entre dos. 


Si el resto es igual a cero, significa que 
el número es par, por lo que situamos el cur- 
sor en el lugar correspondiente a los números 
pares y lo escribimos. Si el número es impar, 
lo escribiremos en la columna correspondien- 
te a los números impares. 


La variable F es la que controla las lí- 
neas en donde se van escribiendo los núme- 
ros. Si la F tiene un valor igual a 16, significa 
que la tabla está llena y se ejecuta el proce- 
dimiento OTRA. Si no es igual a 16, se incre- 
menta en uno el valor de la variable y se de- 
vuelve el control al procedimiento B. 


'El procedimiento OTRA solicita que se 
pulse una tecla. Una vez pulsada se vuelve a- 
comenzar el proceso: 


PARA OTRA 
BT 


? 
ER 
> PONCURSOR ( 12 22 ] 

> ES[ PULSA UNA TECLA ] 
> HAZ "T LC 

> TODO 

> FIN 


Por último, definimos el procedimiento 
que inicializa el proceso y que lo pone en fun- 
cionamiento: 


? PARA TODO 
> BP 

> BT 

> OT 

> UN 

> HAZ'F 

> BD 

> FIN 


Para ejecutarlo introducimos: 
? TODO 


La primera pantalla que obtenemos es: 


Fig. 5. 


Si empezamos a introducir números 
hasta completar la tabla, obtenemos la siguien- 
te pantalla: 


> PONPROP "A3 "MUSICA "POP 
> ES PROP "A3 "MUSICA 
> FIN 


CORRECTO. 


El procedimiento A3 devuelve la pala- 
bra POP. 


— ? PARA A4 
> HAZ'AO 
> DEV:A 
> FIN 


El procedimiento en sí es. correcto. De- 
pendería de cómo se ejecutase el que diese o 
ño. 6. no error. 


Si ejecutamos el procedimiento: 
5: 9 As 
— ? PARA'“A1 obtendríamos el mensaje: 
> HAZ "A "CENICERO NO SE QUE DEBO HACER CON 0 
> PONPROP :A "GRANDE "RICO E A j 
> ES PROP :A “GRANDE Si introducimos: 
> FIN ; ? ESAS 
CORRECTO obtendremos: 
Si ejecutamos el procedimiento Al, en 0 
la pantalla aparecerá la palabra RICO. — ? PARA AS 
— ? PARA A2 > DEV “PRONTO 
> HAZ "A “JARDIN > FIN 
> HAZ "'B PONPROP :A “FLOR ? ESPALABRA "HASTA A5 
cora CORRECTO. 
> FIN En la pantalla aparecerá la palabra: 
INCORRECTO. HASTAPRONTO 
El Logo devuelve el mensaje: — ? DEV[ NO ES POSIBLE ] 
PONPROP NO HA DEVUELTO NADA A INCORRECTO. 
HAZ La orden DEVUELVE tiene que estar a 
— ? PARA A3 la fuerza dentro de un procedimiento. 
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La alta resolución en el IBM PC 
y compatibles (II) 


N el tomo anterior vimos al- 
gunos de los comandos grá- 
ficos que podíamos usar si 
trabajábamos en un IBM pc 
o compatible bajo GWBA- 
SIC. En este nuevo tomo ve- 
remos, por fin, cómo definir 
gráficos en dicho ordenador 


La instrucción GET 


Esta instrucción será la que nos permi- 
tirá, por así decirlo, definir nuestros propios 
gráficos. El tamaño de los mismos y el número 
de ellos sólo vienen dados por la cantidad de 
memoria libre que tengamos. 

Con esta instrucción podemos almace- 
nar en una variable numérica (entera o de sim- 
ple precisión) el contenido de un área rectan- 
gular de la pantalla. Para ello tenemos que de- 
cirle al ordenador cuál es la esquina superior 
izquierda y la esquina inferior derecha del 
rectángulo perteneciente a la pantalla que 
queremos almacenar. 

La sintaxis de esta instrucción es la si- 
guiente: 


GET (X1, Y1) - (X2, Y2), var 


donde: 

X1 = Coordenada en X de la esquina su- 
perior izquierda del rectángulo que queremos 
almacenar. 

Y] = Coordenada en Y de la esquina su- 
perior izquierda del rectángulo que queremos 
almacenar. 

Y2 = Coordenada en Y de la esquina in- 
ferior derecha del rectángulo que queremos 
almacenar. 
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X2 = Coordenada en X de la esquina in- 
ferior derecha del rectángulo que queremos 
almacenar. 

var = Variable numérica (a ser posible 
entera, para ahorrar memoria, donde queda- 
rá almacenado el rectángulo con el gráfico). 

En la figura 1 podemos ver cómo están 
representadas las coordenadas del rectángu- 
lo que queremos almacenar con la sentencia 
GET. 


Fig. 1. Organización de las coordenadas de la instrucción GET. 


La variable que se encargará de almacenar 
el gráfico tiene que haber sido dimensionada 
con anterioridad a la sentencia GET. Ha de ser 
un vector. Para saber el número de elementos 
que tiene dicho vector es necesario aplicar la 
siguiente fórmula: 


Número de elementos = INT ((X2 - X1) / 4) * 
(Y2 - Y1- 1) 


El programa que vamos a ver a conti- 
nuación nos muestra cómo usar esta sentencia. 


1000 REM aolaaalalolOloalalociolidiaKK 

1010 REM * CASA CON RUEDAS x 

1020 REM Adlaiaalolalolalolalololalalojolalal 

1030 REM 

1040 REM dadaSldlalO lalalala lalalala laalalalalalolalalalalalalalalalolalololalololalolololaioioK 
1050 REM »* PROGRAMA DEMOSTRACION PARA VER EL FUNCIONAMIENTO x* 
1060 REM * DE LA INSTRUCCION GET EN EL IBM Y COMPATIBLES * 
1070 REM aaaaaaioldlalalalalala lalalala jalala lalalala lajajolalalalala lalala lalala alojololaloloidjolojojoK 
1080 REM 

1090 REM *xk INICIALIZACION x*x*x* 

1100 REM 

1110 SCREEN 1 

1120 CLS 

1130 OPTION BASE 0 

1140 KEY OFF 

1150 REM 

1160 XXX DIBUJO DE LA CASA CON RUEDAS xxx 

1170 REM 

1180 LINE (0,20)-(20,0) 

1190 LINE -(40,20). 

1200 LINE -(0,20) 

1210 LINE -(0,60) 

1220 LINE -(40,60) 

1230 LINE -(40,20) 

1240 LINE (5,25)-(15,35),1,BF 

1250 LINE (35,25)-(25,35),1,BF 

1260 LINE (15, 40)-(25,60),2,B 

1270 CIRCLE (10,65),5 

1280 CIRCLE (30,65),5 

1290 REM 

1300 REM *x** LECTURA DE EL RECTANGULO EN EL CUAL ESTA LA CASA *Xx*xX 
1310 REM 

1320 LET X1=0 

1330 LET Yi=0 

1340 LET X2=40 

1350 LET Y2=70 

1360 DIM AX(3+INT((X2-X1)/4)*((Y2-Y1)-1)) 

1370 GET (X1,Y1)-(X2,Y2),Ax 

1380 REM 

1390 REM Adol lalOtOlJOK 

1400 REM *k PROGRAMA PRINCIPAL x* 

1410 REM ollo dl okok 

1420 REM 

1430 CLS 

1440 PRINT " Ahora puedes mover la casa con las siguientes teclas" 
1450 PRINT e 


1480 PRINT " P = DERECHA” 
1470 PRINT " O = IZQUIERDA" 
1490 PRINT " Q = ARRIBA" 
1490 PRINT " A = ABAJO” 
1500 PRINT 


1510 PRINT "PULSA UNA TECLA" 
1520 LET A$=INPUT$(1) 

1530 CLS 

1540 LET X=0 

1550 LET Y=0 

1560 LET XO=0 

1570 LET YO=0 

1580 LET SX=4 

1590 LET SY=4 

1800 PUT (X, Y), AX 

1610 REM 

16820 REM x*kx* MOVIMIENTO DE LA CASA CON RUEDAS x*ox* 
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1630 REM 

1640 LET A$=INKEY$ 

1650 IF A$="P" THEN LET X=X+SX 
1660 IF A$="0" THEN LET X=X-SX 
1670 IF A$="Q" THEN LET Y=Y-SY 
1680 IF A$="A" THEN LET Y=Y+SY 
1690 IF X<0 THEN X=0 

1700 IF X>270 THEN X=270 

1710 IF Y<O THEN Y=0 

1720 IF Y>130 THEN Y=130 

1730 PUT (X0O, YO), A% 

1740 PUT (X,Y), AX 

1750 LET XO=X 

1760 LET YO=Y 

1770 IF A$=" " THEN GOTO 1790 
1780 GOTO 1840 

1790 REM 

1800 REM *x*x* FIN DEL PROGRAMA xxx 
1810 REM 

1820 CLS 

1830 FOR I=0 TO 1 

1840 FOR J=0 TO 6 

1850 PUT(J*45, 1x80), AX 
1860 NEXT J 

1870 NEXT I 

1880 REM 


1890 REM x*x*x* BUCLE INFINITO. PULSE CONTROL Y BREAK PARA TERMINAR xxkx 


1900 REM 
1910 GOTO 1910 


Como podemos ver en el programa, pri- 
mero dibujamos una «casa» con ruedas y la al- 
macenamos en el vector A%. Después de he- 
cho esto nos aparece una pantalla que nos in- 
dica qué teclas tenemos que usar para mover 
la casa por la pantalla. Cuando nos cansamos 
de hacerlo, si pulsamos la barra espaciadora, 
nos aparecerá la casa repetida 14 veces en la 
pantalla. 


Fig. 2. Ejecución del programa 1. 
En el programa aparece una nueva ins- 
trucción que no hemos visto todavía. Es la ins- 
trucción PUT. Con ella podremos colocar el 
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gráfico que hemos almacenado con la senten- 
cia GET en cualquier parte de la pantalla. 


La instrucción PUT 


Esta nueva instrucción será la que nos 
permitirá colocar el gráfico que hemos alma- 
cenado con la instrucción GET en cualquier 
parte de la pantalla. Su sintaxis es muy pare- 
cida a la de la sentencia GET, pero tiene una 
modificación muy importante: 


PUT (X, Y), var, operación 
donde: 


X = Coordenada en X de la pantalla 
donde queremos que se coloque la esquina su- 
perior izquierda del gráfico. 

Y = Coordenada en Y de la pantalla 
donde queremos que se coloque la esquina su- 
perior izquierda del gráfico. 

var = Variable (vector) que tiene alma- 
cenado el gráfico a poner en pantalla. 

operación = Operación lógica que que- 
remos que hagan los puntos del gráfico con los 
de la pantalla. 

Lo más importante de la sentencia PUT, 
aparte de que nos permite poner gráficos en 
cualquier parte de la pantalla, es que pode- 


mos elegir la operación que queremos que 
realicen los puntos de dicho gráfico con los 
puntos que ya hubiese en la pantalla. Las ope- 
raciones disponibles son las siguientes: 


PSET = Pone los puntos del gráfico que 
estén iluminados y borra los que estén apaga- 
dos. Esto significa que, si previamente tenía- 
mos algo dibujado en la posición donde vamos 
a colocar el gráfico, se borrará y aparecerá 
nuestro gráfico. 

PRESET = Realiza la misma operación 
que PSET, pero invirtiendo los puntos. Si un 
punto del gráfico original estaba encendido, 
con este tipo de operación aparecerá apaga- 
do. Si estuviese apagado, aparecerá encen- 
dido. 

AND = Realiza la operación AND entre 
los puntos del gráfico y los de la pantalla. Esto 
significa que sólo se imprimirán aquellos pun- 
tos que existan en la misma posición en la pan- 
talla y en el gráfico. 

OR = Realiza la operación OR entre los 
puntos de la pantalla y los del gráfico. Esto es, 
un punto se imprimirá si está en la pantalla, si 
está en el gráfico o si está en ambos. 

XOR = Realiza la operación XOR entre 
los puntos de la pantalla y los del gráfico. Esta 
es la opción por defecto si no ponemos ningu- 
na operación en la sentencia PUT. Su efecto es 
encender los puntos que se encuentren en la 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 SCREEN 1 

1130 CLS 

1140 OPTION BASE O 
1150 DIM CX(227) 
1160 DIM 0CX(10) 
1170 DIM OAX(9) 
1180 DIM NGX(13) 
1190 DIM NPX(13) 
1200 DIM CSX(77) 
1210 DIM CEX(77) 
1220 DIM CNX(77) 
1230 REM 


AMOO RR 
k CARAS * 
AMOoiojolok 


Xok INICIALIZACION vkokx* 
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pantalla o en el gráfico y borrar los que se en- 
cuentren en la pantalla y en el gráfico. 

Para entender mejor el sentido de es- 
tas operaciones, en la figura 3 aparece una lis-. 
ta con las tablas de la verdad de todas estas 
operaciones. 


Fig. 3. Tablas de la verdad de las operaciones que podemos rea- 
lizar con el comando PUT. 


A continuación vamos a ver otro progra- 
ma que utiliza unas cuantas sentencias PUT y 
GET para comprender mejor su funcionamien- 
to. 


ASS S jaa alalololalolok 
* PROGRAMA DEMO PARA VER EL USO DE LAS x 
* SENTENCIAS GET Y PUT EN EL IBM. 
AMOS OOOO lalalala lalalala lalalala jalalollolokak 


kx 
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1240 REM AMOR lll lalalala lalala lllalalalalolalallaloK 

1250 REM * DIBUJO Y ALMACENAMIENTO DE LAS DISTINTAS CARAS x 

1280 REM AMOS lO lalalala lalalala lalolaloK 

1270 REM 

1280 REM **x CABEZA *okx 

1290 REM 

1300 CIRCLE (20,20),20 

1310 PAINT (20,20),3,3 

1320 GET(O,0)-(40, 40), C% 

1330 REM 

1340 REM x**x OJO CERRADO Xxx 

1350 REM 

1380 CIRCLE (12,12),3,0 

1370 CIRCLE (28,12),3,0 

1380 GET(9,9)-(18,18),0Cx 

1390 REM 

1400 REM *xx OJO ABIERTO Xxx 

1410 REM 

1420 PAINT (12,12),0,0 

1430 PAINT (28,12),0,0 

1440 CIRCLE (12,12),1,2 

1450 CIRCLE (28,12),1,2 

1480 GET(9,9)-(18,16),0A% 

1470 REM 

1480 REM kk NARIZ PEQUENA *xx 

1490 REM 

1500 LINE (18,18)-(22,22),2,BF 

1510 GET(16,18)-(24,25),NPx 

1520 REM 

1530 REM xxx NARIZ GRANDE tx 

1540 REM 

1550 LINE (18,18)-(22,25),2,BF . 

1860 LINE (18,23)-(24,25),2,BF 

1570 GET(18,18)-(24, 25) ,NG% 

1580 REM : 

1590 REM xx CARA SONRIENDO xotxk 

1600 REM 

1810 CIRCLE (20,25),10,0,3.14,0 

1620 CIRCLE (20,22),10,0,3.14,0 

1830 PAINT (20,32),0,0 

1640 GET(5,22)-(35,40), CS% 

1850 REM 

1660 REM ok CARA NORMAL. xokok 

n - 1670 REM 
1680 CLS 
1690 CIRCLE (20,20), 20,3 
1700 PAINT (20,20),3,3 
1710 LINE (18,18)-(22,28),2,BF 
1720 LINE (16,23)-(24,25),2,BF 
1730 LINE (10,30)-(30,33), 0, BF 
1740 GET(5,22)-(35, 40), CNXx 
1750 REM 
1780 REM xxx CARA ENFADADO xtxk 
1770 REM 
1780 CLS 
1790 CIRCLE (20,20), 20,3 
1800 PAINT (20,20),3,3 
1810 LINE (18,18)-(22,25),2,BF 
1820 LINE (16,23)-(24,25),2,BF 
1830 CIRCLE (20,35),10,0,.4,2.74 
1840 CIRCLE (20,38),10,0,.45,2.79 
1850 CIRCLE (20,37),10,0,.5,2.64 


> 
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1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 


GET(5,22)-(35, 40), CEX 
REM 
REM olooaSldlalalalolollalolalajojololok 
REM * PROGRAMA PRINCIPAL x* 
REM 3aSSSIONISIOIjOlalalOJOJOJOJOKOK 
REM 
CLS 
LOCATE 24,1 
PRINT "FIJATE EN LA CARA”; 
LOCATE 8,15 
PRINT CHR$(201);STRING$(10,205);CBR$(187) 
FOR 1=9 TO 17 

LOCATE 1,15 

PRINT CHR$(186);TAB(28);CHR$(186) 
NEXT 1 
LOCATE 18,15 
PRINT CHR$(200);STRING$(10, 205) ;CHR$(188) 
LET X=140 
LET Y=80 
PUT(X, Y), C% 
PUT(X+9,Y+9),OA%, PSET 
PUT(X+25, Y+9),0OAX%, PSET 
PUT(X+16, Y+18),NGX, PSET 
PUT(X+5, Y +22), CSX, PSET 
RANDOMIZE TIMER 
LET NUM=INT(RNDx9 )+1 
ON NUM GOSUB 2160, 2230,2300,2370, 2440, 2510, 2580, 2850, 2720 
FOR I=1 TO 500 
NEXT 1 
GOTO 2110 
REM 
REM x*x*x* OJO DERECHO CERRADO kk 
REM 
GOSUB 2790 
PRINT "CIERRO EL OJO DERECHO” 
PUT (X+25,Y+9),0C%, PSET 


RETURN 

REM 

REM *x*k OJO IZQUIERDO CERRADO x*kx 
REM 

GOSUB 2790 

PRINT "CIERRO EL OJO IZQUIERDO!" 


PUT (X+9,Y+9),0CX, PSET 


RETURN 

REM 

REM x**x*k OJO DERECHO ABIERTO *xkx 
REM 

GOSUB 2790 

PRINT "ABRO EL OJO DERECHO" 


PUT (X+25,Y+9),O0AX, PSET 


RETURN 

REM 

REM *x*x OJO IZQUIERDO ABIERTO x*xkx 
REM 

GOSUB 2790 

PRINT "ABRO OJO IZQUIERDO” 


PUT(X+9,Y+9),0A%, PSET 

RETURN 

REM 

REM Xxx NARIZ GRANDE xxx* 

REM a 
GOSUB 2790 

PRINT "TENGO LA NARIZ GRANDE x*xkx 
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2490 PUT (X+16,Y+18),NGX, PSET 

2500 RETURN 

2810 REM : 

2620 REM *xk NARIZ PEQUENA xo 
2530 REM 

2540 GOSUB 2790 

2550 PRINT "TENGO LA NARIZ PEQUENA” 
2580 PUT(X+186, Y+18),NPX, PSET 

2570 RETURN 

2580 REM 

2590 REM *** BOCA SONRIENDO »*xxkxk 
26800 REM 

2610 GOSUB 2790 

2620 PRINT "ESTOY CONTENTO” 

2630 PUT (X+5,Y+22),C8S%, PSET 

2640 RETURN 

2650 REM 

2660 REM x*x*x* BOCA NORMAL. xoxok 

2670 REM 

26880 GOSUB 2790 

2690 PRINT "ESTOY PENSATIVO” 

2700 PUT (X+5,Y+22),CN%, PSET 

2710 RETURN 

2720 REM 

2730. REM x*xx*x* BOCA ENFADADA ok 
2740 REM 

2750 GOSUB 2790 

2760 PRINT "ESTOY ENFADADO" 

2770 PUT (X+5,Y+22),CEX, PSET 

2780 RETURN 

2790 REM 

2800 REM dada joa lalalala lalola lalala lalola jajaa lalalolololokk 
2810 REM * LIMPIA LA LINEA SUPERIOR DE LA PANTALLA * 
2820 REM AdoaaaiaaialO alla lalalala lalola lalalala lalala lalalala lolo 


20930 REM 

2840 LOCATE 1,1 

2850 PRINT SPACE$(40) 
2860 LOCATE 1,1 

2870 BEEP 

2880 RETURN 


Las figuras 4 y 5 nos muestran algunas 
de las caras que es capaz de poner el hom- 
brecillo. El programa se ha realizado de ma- 
nera que el cambio de expresión sea automá- 


Fig. 4. 


20 


tico, pero el lector podría cambiarlo con mu- 
cha facilidad para que la expresión cambie al 
pulsar una secuencia de teclas que él elija. 


Fig. 5. 


La instrucción POINT 


Esta nueva instrucción es muy sencilla 
y muy útil. La utilizaremos para saber de qué 
color es un punto que se encuentre en una po- 
sición X, Y de la pantalla. Su sintaxis es la si- 
guiente: 


LET var = POINT (X, Y) 
donde: 


var = A una variable numérica. Como el resul- 
tado de esta instrucción es un número, se pue- 
de almacenar en una variable, imprimirlo en 
pantalla o impresora, operar con él, etc. 


X = Coordenada en X del punto que 
queremos testear. 


Y = Coordenada en Y del punto que 
queremos testear. 


Esta instrucción nos dice el color del 
punto que se encuentra en las coordenadas X, 
Y. Si dicho punto no está iluminado, entonces 
nos devolverá un cero (0). Si el punto estuvie- 
se iluminado, nos devolverá un número entre 
1 y 3, dependiendo del color. Cuando nos en- 
contramos en SCREEN 2, como sólo tenemos 
un color de tinta, si el punto está iluminado, 
nos dará el valor uno (1). 


1000 REM oooO lalollalololalololojo oK 
1010 REM * VENTANAS GRAFICAS * 
1020 REM MOON lok 
1030 REM 


Lainstrucción VIEW 

Una de las instrucciones más potentes 
y útiles del GWBASIC es la instrucción VIEW. 
Con ella podemos definir una ventana gráfica 
que ocupe sólo una parte de la pantalla y di- 
bujar en ella sin riesgo de salirnos. Si creamos 
una pantalla gráfica con el comando VIEW, al 
realizar un CLS sólo se borrará dicha parte de 
la pantalla. 

La sintaxis del comando VIEW es la si- 
guiente: 


VIEW (X1, Y1) - X2, Y2) 
donde: 


X1 = Coordenada en X de la esquina su- 
perior izquierda de la ventana. 

Y1 = Coordenada en Y de la esquina su- 
perior izquierda de la ventana. 

X2 = Coordenada en X de la esquina in- 
ferior derecha de la ventana. 

Y2 = Coordenada en Y de la esquina in- 
ferior derecha de la ventana. 


Como puede apreciarse, la sintaxis es 
muy parecida a la de la sentencia GET, aun- 
que su función es totalmente distinta. 

El programa 3, que aparece a continua- 
ción, nos muestra algunas de las cosas que po- 
demos hacer con VIEW: 


1040 REM oo jO Ojala lajolalala jajajajajajajaja jolalojoK: 
1050 REM * PROGRAMA DE DEMOSTRACION PARA VER EL x 
1060 REM * USO DE LA SENTENCIA VIEW EN EL IBM. *X 
1070 REM dalla ollo ollo llo lalala lalolololalajok 


1080 REM 
1090 REM **x* INICIALIZACION x*x*xk 
1100 REM 
| 1110 SCREEN 1 
1120 CLS 
1130 KEY OFF 
1140 REM x*x*x* VENTANA No, 1 *x*kx* 
1150 REM 
1160 GOSUB 1680 
1170 VIEW(O,0)-(100, 100) 
1180 LINE (0,0)-(99,99),0,B 
1190 GOSUB 1560 
1200 GOSUB 1430 
1210 GOSUB 1560 
1220 REM 
1230 REM x*x*%k VENTANA No. 2 *x*x* 
1240 REM 
1250 GOSUB 1680 
1280 VIEW (100, 100)-(199, 199) 
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1270 LINE (0,0)-(99,99),0,B , 
1280 GOSUB 1560 
1290 GOSUB 1430 . 

1300 GOSUB 1560 
1310 REM 

1320 REM *x*xx*x VENTANA No. 3 x*xx 

1330 REM 

1340 GOSUB 1880 

1350 VIEW (40,30)-(139,129) 

1360 LINE (0,0)-(99,99),0,B 

1370 GOSUB 1560 

1380 GOSUB 1430 

1390 GOSUB 1560 

1400 VIEW 

1410 CLS 

1420 END 

1430 REM 

1440 REM aalololojook 

1450 REM * DIBUJA *x 

1460 REM AxaoooOIdoloK 

1470 REM 

1480 PSET (0,0) 

1490 FOR I=0 TO 100 STEP 3 

1500 LINE -(100-I, 1) 

1510 LINE -(100-I,100-1I) 

1520 LINE -(I,100-1) 

1530 LINE -(1,1) 

1540 NEXT I 

1550 RETURN 

1560 REM 

1570 REM SSSSSNISIAISSIAjSlSlAlOjRlRjSlSlO lll 
1580 REM * PULSA UNA TECLA Y BORRA VENTANA x 
1590 REM Ao Olalla lalalaolloK 


1600 REM 
1610 LOCATE 24,1 
1620 


PRINT "PULSA UNA TECLA PARA BORRAR”; 


1630 LET A$=INPUT$(1) 

1640 CLS 

1650 FOR I=1 TO 600 

1660 NEXT 1 

1670 RETURN 

1680 REM 

1690. REM AMARO ROK 

1700 REM * COLOREAR LA PANTALLA x* 

* 1710 REM AA ASS llo klokaok ok 

-. 1720 REM 

1730 VIEW : REM TODA LA PANTALLA COMO UNA UNICA VENTANA 

1740 CLS 

1750 FOR I=1 TO 23 

1760 PRINT STRING$(40, 219); 

1770 NEXT 1 

1780 RETURN 


Como hemos vis*o, la instrucción CLS 
sólo afecta a la ventana que acabamos de 
crear. Por otro lado, se puede apreciar que las 
coordenadas, dentro de dicha ventana, cam- 
bian. Ya no son las coordenadas que eran an- 


teriormente, sino que la esquina superior iz-. 


quierda corresponde a X=0 e Y=0. Si desea- 
mos que no s” pierdan las coordenadas origi- 
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nales, podemos variar la sintaxis de la instruc- 
ción VIEW y ponerla como: 


VIEW SCREEN (X1, Y1) - (X2, Y2) 


Con ello permanecerán las coordena- 
das originales. 

Si ponemos solamente la orden VIEW, 
sin especificar las coordenadas, lo que hace- 


mos es que toda la pantallá sea considerada 
como una única ventana. Poniéndolo así volve- 
mos a las condiciones originales antes de es- 
cribir la primera orden VIEW con coordena- 
das. Esta orden equivale a poner: 


VIEW (0,0) - (319, 199) 


La instrucción WINDOW 


Pero no acaba aquí lo que podemos ha- 
cer con las ventanas que definamos, sino que, 
además, podemos hacer que el centro de coor- 
denadas se encuentre en el centro del rectán- 
gulo que define la ventana. Con ello podemos 
definir un sistema de coordenadas totalmente 
independientes de las coordenadas físicas de 
la pantalla. Su sintaxis es la siguiente: 


WINDOW (SX1, SY1) - (5X2, SY2) 
donde: 


y 


SX1 = uno (1) o menos uno (-1), depen- 
diendo del valor que queremos tener a la iz- 
quierda del centro de la ventana. Si es un l, 
será positivo, y si es -1, será negativo. 


SY1 = uno (1) o menos uno (-1), depen- 
diendo del valor que queremos tener bajo el 
centro de la ventana. Si es 1, será positivo, y 
si es -1, será negativo. 


SX2 = uno (1) o menos 1 (-1), depen- 
diendo del valor que queremos tener a la de- 
recha del centro de la ventana. Si vale 1, será 
positivo, y si vale -1, será negativo. 


SY2 = uno (1) o menos 1 (-1), depen- 
diendo del valor que queremos tener sobre el 
centro de la ventana. Si vale 1, será positivo, 
y si vale -1, será negativo. 


Si, por ejemplo, decimos que: 


WINDOW (-1,1) - (1, -D) 


estaremos definiendo la ventana con un eje de 
referencia puramente cartesiano, tal y como 
aparece en la figura 6. 
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Fig. 6. Eje de coordenadas cartesiano. 


mientras que si ponemos: 
WINDOW (1,1) - El, -1) 


el sistema de coordenadas que tendremos 
será como el que aparece en la figura 7. 


Fig. 7. Eje de coordenadas no cartesiano. 


Como ocurría al utilizar la instrucción 
VIEW cuando queríamos que las coordenadas 
no cambiasen, sino que siguiesen siendo las fí- 
sicas de la pantalla, al utilizar el comando 
WINDOW podemos hacer lo mismo con sólo 
poner la palabra SCREEN tras la palabra WIN- 
DOW de la siguiente manera: 


WINDOW SCREEN (SX1l, SY1) - (SX2, SY2) 


La 


TRUCOS Y RUTINAS BASICAS 


L lector puede recordar que do a que el IBM no permite redefinir sus ca- 
durante una serie de tomos  racteres, no incluimos ningún programa para 
estuvimos viendo unos pro- IBM. 

gramas que nos permitían Ahora sabemos que podemos definir 
definir caracteres y SPRI-— gráficos y moverlos por la pantalla mediante 
TES en cada uno de los dis- las instrucciones GET y PUT, por ello, a conti- 
tintos ordenadores que en  nuación damos un programa para poder defi- 
esta sección tratamos. Debi- nir y almacenar dichos gráficos. 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 

., 1150 
1180 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 

1330 


REM oRSiolSIOO ISSO RojRlEldlS loa aloja lajolololojolajVlblor 
REM * k 
REM* DEFINIDOR DE GRAFICOS XK, 
REM *x * 
REM x*x PARA Il. B. M. * 
REM x* * 
REM SSA OJOS lallalalalolalalalElalalalalalaolajolalojolOIOIOIOJOK 
REM 

REM SOS lolo lok 

REM * Programa escrito por: * 

REM *x *k 

REM * Fco. Morales Guerrero * 

REM SSI MOSOol lola jolok 

REM 

REM oO OOOO IVIRJOIOK 

REM x*x * 

REM *x (c) Ediciones Siglo Cultural *x 

REM x*x xk 

REM * (c) 1987. x 

REM *x *k 

REM aaa OOOO OOOO olaaa lolo look 

REM 

REM SSI lO lO jO OJO k 

REM *x*x* INSTRUCCIONES x*xxkxk 

REM ASS NSIO o lOlOROJOIOIOK 

REM 

KEY OFF 

SCREEN 2 

WIDTH 80 

CLS 

PRINT TAB(30);"DEFINIDOR DE GRAFICOS" 


PRINT TAB(29);“=========cococccccocce===" 
PRINT 
PRINT 
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1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 


PRINT " Usa las teclas del cursor (8,2,4,6) para moverte por la parrilla." 
PRINT 

PRINT " Pulsa la barra espaciadora para encender o apagar un punto.” 
PRINT 

PRINT " Pulsa Fl para grabar lo definido en formato interno." 

PRINT 

PRINT " Pulsa F2 para grabar lo definido como. lineas DATAS." 

PRINT 

PRINT " Pulsa F3 para leer un grafico ya definido desde disco. ” 


PRINT 


PRINT " Pulsa F4 para imprimir el grafico como lineas DATA.” 

PRINT 

PRINT " Pulsa F9 para salir del programa. " 

PRINT 

PRINT " Solo puede definirse un grafico cada vez." 

PRINT y 
PRINT 

PRINT " PULSA UNA TECLA PARA COMENZAR" 


LET AS=INKEY$ 

IF A$="" THEN GOTO 1520 

REM 

REM ASSIM lodo kk 

REM x**x ENTRADA DE DATOS **kx 

REM AMS OOO joa ollo Kok 

REM 

CLS 

PRINT TAB(30);"DEFINIDOR DE GRAFICOS” 


PRINT' TAB(29).; "==========PF22S2======" 

PRINT 

PRINT 

PRINT " Cual va a ser la altura del grafico? (Maximo 19)." 


PRINT 

INPUT “ ===> ",H 

IF H<i OR H>19 THEN PRINT:PRINT "VALOR NO VALIDO":GOTO 1650 
PRINT 

PRINT 

PRINT " Cual va a se la anchura del grafico? (Maximo 40)." 
PRINT 

INPUT) “===> :%; L 

IF L<1 OR L>40 THEN PRINT:PRINT "VALOR NO VALIDO":GOTO 1710 
REM 

REM SNOIOO oo aololololoROK 


REM *x*x* INICIALIZACION *kx*x* 
REM oo Rodado kk ok 
REM 
KEY 1,"" 
FOR I=1 TO 9 
KEY 1,"" 
NEXT 1 , 
ON KEY(1) GOSUB 2570 


ON KEY(2) GOSUB 2840 
ON KEY(3) GOSUB 3220 
ON KEY(4) GOSUB 3770 
ON KEY(9) GOSUB 4150 
FOR I=1 TO 9 
KEY(1I) ON 
NEXT I 
DIM AX(2XL) 
GET(0,0)-(L,H),4% 
REM ps 
AN ES 
REM x*x*x* DIBUJO DE LA PARRILLA Y DE LA PANTALLA *x*x* 
REM SMS SISSI SSI jS OJO alado e 
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TRUCOS Y RUTINAS BASICAS 


1970 REM a 

1980 CLS 

1990 FOR I=1 TO H 

2000 FOR J=1 TO L 

2010 PRINT CHR$(254); 

2020 NEXT J 

2030 PRINT 

2040 NEXT 1 

2050 COLOR ,,1 

2060 LINE(O, 183)-(639,191),,BF 

2070 LOCATE 24,1 

2080 PRINT "Fi---SAVE FORMATO INTERNO  F2---SAVE COMO DATA F3---LOAD  F4---PRI 
NT— F9---FIN"; 

2090 COLOR ,,0 

2100 LINE (400,0)-(410+L,10+H), ,B 
2110 LET X1=405 

2120 LET Y1=5 

2130 LET X2=X1+L 

2140 LET Y2=Y1+8 

2150 LET X=1 

2160 LET Y=1 

2170 REM 

2180 REM ASAS jolla lolo kaJok 
2190 REM x*x*x* PROGRAMA PRINCIPAL xx 
2200 REM ajo lalo foJVIOIOK 


2210 REM 
2220 LET A$=INKEY$ 
2230 IF A$=" " THEN GOTO 2440 


2240 LET DX=0 
2250 LET DY=0 
2260 IF LEN(A$)=2 THEN LET A$=MID$(A$, 2,1) 
2270 IF A$=CHR$(77) THEN LET DX=1:LET DY=0 
2280 IF A$=CHR$(75) THEN LET DX=-1:LET DY=0 y 
2290 1F A$=CHR$(72) THEN LET DY=-1:LET DX=0 
2300 IF A$=CHR$(80) THEN LET DY=1:LET DX=0 
2310 LET C=POINT(X1+X, Y1+Y) 
2320 IF C=1 THEN LOCATE Y,X:PRINT CHR$(219) 
2330 IF C=0 THEN LOCATE Y,X:PRINT CHR$(254) 
2340 Y=Y+DY 
2350 X=X+DX 
2360 IF X>L THEN LET X=L 
2370 1F X<1 THEN LET X=1 
2380 IF Y>H THEN LET Y=H 
2390 1F Y<1 THEN LET Y=1 
2400 LOCATE Y,X 

3 2410 PRINT " “ 
2420 GOTO 2220 
2430' GET (0,0)-(L,H),A% 
2440. REM 
2ABO REM SONOROS llo lalOKOK 
2460 REM * FIJACION Y BORRADO DE PUNTOS »xkx 
2470 REM AMS Olla laalolalolVlOlOlIOK 
2480 REM 
2490 LET C=-POINT(X1+X, Y1+Y) ' 
2500 LET C=-NOT C 
2510 PSET(X1+X, Y1+Y),C 
2520 GET(X1,Y1)-(X2,Y2), AX 
2530 IF C=0 THEN LOCATE Y,X:PRINT CHR$(254) 
2540 IF C=1 THEN LOCATE Y,X:PRINT CHR$(219) 
2550 GOTO 2220 
2560 GOTO 2580 
2570 REM 
2580 REM sao Soo oalololalalolololooKk 
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2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
27680 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
2950 
2980 
2970 
2980 
2990 
3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 


REM x*x*x* SAVE EN FORMATO INTERNO xxx 
REM SSI jO lolo lololok 
REM le 

KEY(1) STOP 

LINE(O, 159)-(639,167), , BF 

LOCATE 21,29 

COLOR ,,1 

PRINT "SAVE EN FORMATO INTERNO" 
COLOR ,,0 

GOSUB 4470 : REM PETICION DE NOMBRE 
LET N$=N$+".GRP" 

LOCATE 22,1 

PRINT SPACE$(80) 

LOCATE 22,1 


PRINT "GRABANDO CON FORMATO INTERNO: ” 


OPEN N$ FOR OUTPUT AS 41 
PRINT $1,L 
PRINT +$1,H 
FOR 1=0 TO 2xL 
PRINTH1, AX(1) 
NEXT 1 
CLOSE $1 
GOSUB 4560 : REM FIN DE FUNCION 
KEY(1) ON 
RETURN 
REM 
REM AMOO aaa lolo lolojolok 
REM **x SAVE COMO LINEAS DATA **x 
REM SSASSSS OSO Oldla al jaloalolola ja jolololalakak 
REM 
KEY(2) STOP 
LINE(O, 159)-(639,167), BF 
LOCATE 21,28 
COLOR ,,1 
PRINT "SAVE COMO LINEAS DATA" 
COLOR ,,0 
GOSUB 4470 : REM PETICION DE NOMBRE 
LET N$=N$+".BAS" 
OPEN N$ FOR OUTPUT AS +1 
LOCATE 22,1 
PRINT SPACE$(80) 
LOCATE 22,1 
INPUT "DESDE QUE LINEA ==> “;LI 
LOCATE 22,1 
PRINT SPACE$(80) 


LOCATE 22,1 

PRINT “GRABANDO COMO LINEAS DATA: ";¡N$ 
PRINT +$1,LI;"DATA";5L;",";B 

LET LI=LI+10 


FOR I=0 TO 2*xL STEP 10 

PRINT +1,LI;"DATA"; 

N=8 

IF 1+9>2*xL THEN LET N=2*xL-I-1 

FOR J=1I TO I+N 

PRINT $1,4X(J);","; 

NEXT J 

PRINT $1, 4%(J) 

LET LI=LI+10 
NEXT 1 
CLOSE $1 de 
GOSUB 4560 : REM OPERACION TERMINADA 
KEY(2) ON 
RETURN 
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hd 


TRUCOS Y RUTINAS BASICAS 


. 3220 REM 

3230. REM oooO ooo llolajolOloJoK 
3240 REM *x*xx* LOAD EN FORMATO INTERNO *xx 
3250 REM aaiaaalolOlSlalo lalola olloololkok 
3260 REM 
3270 KEY(3) STOP 
3280 LINE(O,159)-(639,167), , BF 
3290 LOCATE 21,29 
3300 COLOR ,,1 
3310 PRINT “LOAD EN FORMATO INTERNO” 
3320 COLOR ,,0 
3330 GOSUB 4470 : REM PETICION DE NOMBRE 
3340 LET N$=N$+".GRP" 
3350 LOCATE 22,1 
3380 PRINT SPACE$(80) 
3370 LOCATE 22,1 
3380 PRINT "CARGANDO CON: FORMATO INTERNO: "N$ 
3390 OPEN N$ FOR INPUT AS +1 
3400 ERASE AX 
3410 INPUT +1,L 
3420 INPUT $1,H 
3430 DIM AX(2*L) 
3440 FOR 1=0 TO 2xL 
3450 INPUT $1,A%(1) 
3460 NEXT I 
3470 CLOSE +1 
3480 LOCATE 22,1 
3490 PRINT SPACE$(80) 
3500 LOCATE' 22,1 
3510 PRINT "ESPERE UN MOMENTO" 
3520 FOR I=1 TO 19 
3530 LOCATE 1,1 
3540 PRINT SPACE$(80) 
3550 NEXT I 
3560 LOCATE 1,1 
3570 FOR I=1 TO H 
3580 FOR J=1 TO L 
3590 PRINT CHR$(254); 
3600 NEXT J 
3610 PRINT 
3620 NEXT 1 
3630 LINE(400,0)-(410+L, 10+H),,B 
3640 LET X2=X1+L 
3650 LET Y2=Y1+H 

o. 38660 PUT(X1,Y1),4% 
3670 FOR I=1 TO H 
3680 FOR J=1 TO L 
3690 IF POINT(X1+J,Y1+1)=1 THEN LOCATE 1,J:PRINT CHR$(219) 
3700 NEXT J 
3710 NEXT I 
3720 LET X=1 
3730 LET Y=1 
3740 GOSUB 4560 : REM FIN DE FUNCION 
3750 KEY(3) ON 
3760 RETURN 
3770 REM 
3780 REM oO ASIS OSEA lajolalalaloKaK 
3790 REM *x*x* IMPRESION COMO LINEAS DE DATA xxx 
3800 REM Ao O alla lalola ialolalalalololllololoK 
3810 REM 
3820 KEY(4) STOP 
3830 LINE(O, 159)-(639,167), , BF 
3840 LOCATE 21,28 
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3850 
3860 
3870 
3880 
3890 
3900 
3910 
3920 
3930 
3940 
3950 
3960 


3970 
3980 


3990 
4000 
4010 
4020 
4030 
4040 
4050 
4060 
4070 
4080 
4090 
4100 
4110 
4120 
4130 
4140 
4150 
4160 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 
4260 
4270 
4280 
4290 
4300 
4310 
4320 
4330 
4340 
4350 
4360 
4370 
4380 
4390 
4400 
4410 
4420 
4430 
4440 
4450 
4460 
4470 


COLOR ,,1 

PRINT "IMPRESION COMO LINEAS DE DATA" 
COLOR ,,0 

LOCATE 22,1 

PRINT “COLOQUE LA IMPRESORA Y PULSE ENTER” 
LET A$=INKEYS 

IF A$<>CHR$(13) THEN GOTO 3900 

LOCATE 22,1 

PRINT SPACE$(80) 

LOCATE 22,1 

INPUT "A PARTIR DE QUE LINEA EMPIEZO ===> ",LI 
LOCATE 22,1 


PRINT SPACE$(80) 
LOCATE 22,1 


PRINT "IMPRIMIENDO ... ” 
LPRINT LI;"DATA”;L;",";H 
LET LI=LI+10 
FOR I=0 TO 2x*xL STEP 10 
LPRINT LI;"“DATA"”; 
LET N=8 
IF I+N>2*xL THEN LET N=2*L-I-1 
FOR J=I TO I+N 
LPRINT AX(J);5","; 
NEXT J 
LPRINT AX%(J) 
LET LI=LI+10 
NEXT I , 
GOSUB 4560 : REM FIN DE FUNCION 
KEY (4) ON 
RETURN 
REM 
REM RO OoolalololalolaloljolojalalojojojoloK 
REM *x*x* SALIDA DEL PROGRAMA xo 
REM SRSSIOSSlSISlOlS lalalala jolojoK: 
REM 
KEY(9) STOP 
LINE(O, 159)-(639,167), , BF 
LOCATE 21,32 
COLOR ,,1 
PRINT "SALIR DEL PROGRAMA” 
COLOR ,,0 
LOCATE 22,1 
PRINT "ESTAS SEGURO? (S/N)" 
LET A$=INKEYS$ 
IF A$="" THEN GOTO 4280 


IF A$="S" OR A$="s" THEN GOTO 4360 
IF A$="N" OR A$="n" THEN GOTO 4330 
GOTO 4280 

GOSUB 4560 : REM FIN DE FUNCION 
KEY(9) ON 

RETURN 

REM 

REM AMAIA lolo 


REM *x*x* FIN DEL PROGRAMA xxkx 
REM oO lOlOlojoJOJoK 
REM 
SCREEN O 
PRINT "ADIOS ..." 
FOR I=1 TO 10 , 
PRINT .. 
NEXT 1 
END 
REM 
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TRUCOS Y RUTINAS BASICAS 


4480 REM oooO alalalalalololollalolololo or 
4490 REM **x PETICION DE NOMBRE kx 
4500 REM Axl llololoJoJoK 
4510 REM 

4520 LOCATE 22,1 


4530 INPUT "NOMBRE ( SIN EXTENSION ) ==> ";N$ 


4540 IF LEN(N$)>8 THEN GOTO 4520 
4550 RETURN 
4560 REM 
ABTO REM AROS 
4580 REM **x*X FIN DE FUNCION xxx 
AB9O REM MASAS oK 
4600 REM 
4610 LOCATE 21,1 

: 4620 PRINT SPACE$(160) 
4830 LINE(O, 159)-(639,167), ,BF 
4840 LOCATE 21,24 
4650 COLOR ,,1 


4680 PRINT "FUNCION REALIZADA. PULSE UNA TECLA” 


4670 COLOR ,,0 

4680 LET A$=INKEY$ 

4690 IF A$="" THEN GOTO 4680 
4700 LOCATE 20,1 

4710 FOR 1=20 TO 22 

4720 PRINT SPACE$(80) 
4730 NEXT I 

4740 RETURN 


El funcionamiento del programa es muy 
sencillo y rápido de comprender. Una vez in- 
troducido y ejecutado el programa, nos apa- 


-recerán unas breves instrucciones por la pan- 


talla que nos permitirán recordar el uso de los 
comandos de que disponemos. 


Fig. 1. Resumen de comandos e instrucciones. 


A continuación el ordenador nos pre- 
guntará el tamaño que tendrá el gráfico a de- 
finir. Dicho tamaño está restringido a 19 pun- 
tos de largo por 40 de ancho como máximo. 
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Esto es así porque un gráfico más grande no 
cabría en la pantalla. 

Una vez elegido el tamaño del gráfico' 
que vamos a definir, nos aparecerá la pantalla 
de diseño: 


Fig. 2. Una cuadrícula de 19 x 40 antes de empezar a definir. 


Podemos distinguir tres zonas distintas: 


ZONA 1. Se encuentra en la parte supe- 
rior izquierda de la pantalla. Nos aparecerá 
una cuadrícula con tantos puntos verticales y 
horizontales como queremos que tenga el grá- 
fico a definir. 


ZONA 2. Se encuentra en la parte supe- 
rior derecha de la pantalla. En ella vemos un 
rectángulo. Dentro del rectángulo iremos 
viendo, mientras definimos nuestro gráfico, 
cómo va quedando a tamaño real. 

ZONA 3, Ocupa las cuatro últimas líneas 
de la pantalla y, aparte de informarnos sobre 
los comandos disponibles, será la zona donde 
introduciremos los datos que necesite el orde- 
nador. 


Para dibujar en la cuadrícula utilizare- 
mos un cursor parpadeante que podremos mo- 
ver con las teclas del cursor que se encuen- 
tran en el teclado numérico. Estas son las si- 
guientes: 


—8— Mover el cursor hacia arriba. 
—2— Mover el cursor hacia abajo. 
—4— Mover el cursor a la izquierda. 
—6— Mover el cursor a la derecha. 


Para que dichas teclas funcionen, la luz 
que se encuentra junto a NUM LOCK ha de es- 
tar apagada. 


Fig. 3. 


Con las teclas del cursor nos movemos 
dentro de la cuadrícula y, cuando queremos 
que un punto se ilumine, sólo tenemos que pul- 
sar la barra espaciadora. Si lo que queremos 
es borrar un punto, entonces también tendre- 
mos que pulsar dicha barra. Mientras hacemos 
esto, nuestro gráfico irá apareciendo en el 
cuadrado que hay en la ZONA 2. 


Una vez que hayamos terminado la de- 
finición de nuestro gráfico, podemos grabarlo 
de dos formas distintas: 


Si pulsamos la tecla Fl, entonces el grá- 
fico se almacenará en disco de forma que si 
en otro momento necesitamos redefinirlo o 
completarlo, usando la opción F3, podemos 
volver a leerlo, 


Si pulsamos la tecla F2, entonces el or- 
denador nos grabará un fichero con las líneas 
DATA que contienen la información necesaria 
para, desde cualquiera de nuestros progra- 
mas en BASIC, definir el gráfico. El ordenador 
nos preguntará a partir de qué número de lí- 
nea empiezan las líneas DATA. El formato de 
grabación nos permitirá realizar un MERGE de 
nuestro programa con dichas líneas. 


La primera línea DATA sólo contiene 
dos números. Estos son la altura y la anchura 
del gráfico, respectivamente. A continuación 
aparecen una serie de líneas con la definición 
del gráfico. Dichos números hay que almace- 
narlos en una matriz entera para poder utili- 
zar el gráfico mediante las instrucciones PUT 
y GET. 


1000 REM aaa lalalala lalalala lalalala ja lolalalalalalolajalalajololoK 


1010 REM * 


PROGRAMA DEMO PARA VER COMO UTILIZAR LAS * 


1020 REM * LINEAS DATAS CON LA DEFINICION DE LOS GRAFICOS * 
1030. REM. doo ajajaja lalalala lalala lalalala lojalololalogiojaloK 


1040 REM 

1050 CLS 

1080 SCREEN 2 

1070 DIM AX(40) 

1080 RESTORE 9050 

1090 READ L,H 

1100 FOR I=0 TO 39 

1110 READ AX(1) 

1120 NEXT: 1 

1130 LOCATE 14,1 

1140 PRINT STRING$(80, 219) 
1150 FOR I=0 TO 596 STEP 4 
1160 FOR J=1 TO 2 


Si pulsamos la tecla F4, el ordenador 
nos imprimirá un listado de líneas DATA, a 
partir de la línea que nosotros deseemos, con 
la definición del gráfico. 


Por último, si pulsamos la tecla F9 ter- 
minamos el programa. 


1170 PUT(1,93), AX 

1180 NEXT J 

1190 NEXT 1 

1200 END 

9000 REM 

9010 REM AMOS aloja lalalala lalalalollalalallalollalalalololalooK 

9020 REM * LINEAS DATA CON LA DEFINICION DEL GRAFICO x 

9030 REM SSI alo 

9040 REM 

9050 DATA 40 , 10 

9060 DATA 41, 11,0,0,.0 ,-241 271,0, 276 ,-32511 

9070 DATA 128 , 296 , 24576 » 96 , 336 , 8128 , 255 , 338 , 224, 1 
9080 DATA-18047 , 256 , 193 , 8490 , 512 ,-32733 ,-8419 ,-513 , 220 ,-8189 
9090 DATA 768 , 224 ,-16383 , 256 , 192 A o LA 


Fig. 4. Ejemplo de impresión al pulsar F4, 
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EL TALLER DEL HARDWARE 


Analizador lógico (segunda parte) 


L circuito del analizador ló- 
gico permite ser programa- 
do desde los bits del puerto 
de control y los mandos de 
la carátula externa, para po- 
der seguir las señales del 
sistema 'a ensayar. Veamos 
las diferentes señales que 
se producen en el circuito a lo largo de una se- 
cuencia de adquisición y algunos programas 
que permiten controlar la tarjeta y presentar 
los resultados. 


Número de señales muestreadas 


El circuito mostrado en el tomo anterior 
sirve para el registro de 8 señales simultáneas. 
Puede ampliarse en múltiplos de 8, simple- 
mente replicando la circuitería específica de 


la adquisición: registro de entrada, memoria, 


decodificación y circuito de acceso al bus, El 
resto de los circuitos pueden utilizarse de for- 
ma exactamente igual. El circuito de detec- 
ción de la palabra de disparo deberá también 
ampliarse para contemplar un ancho de pala- 
bra mayor. 

El programa de transferencia a memo- 
ria del ordenador deberá modificarse en la 
parte de decodificación, para transferir a un 
número de vectores igual al de grupos de en- 
tradas. La presentación también deberá con- 
templar distintos paneles para los diferentes 
grupos de señales. 


Señales en el circuito 


En la modalidad de uso como analiza- 
dor de tiempos, se fija una velocidad del reloj 
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* 


de muestreo suficiente para que puedan re- 
gistrarse los fenómenos de mínima duración. 
La tarjeta captura las señales como si de un os- 
ciloscopio de muestreo se tratase, pero sin 
apreciar el nivel de la señal. Unicamente se to- 
marán las señales como de nivel lógico 1 si su- 
peran un umbral fijado en la sonda de entra- 
da. A partir de la sonda todo el proceso es di- 
gital. La discretización en el tiempo corres- 
ponde al período de muestreo y en los nive- 
les a la tensión de umbral del amplificador de 
entrada. 


ACTIVAR 
RELOJ INTERNO 


SEÑAL ORIGIMAL 
SEÑAL MUESTREADA 
BELO] DESFASADOR 
SEÑAL MUESTREADA 
Fig. 1. Señales muestreadas para análisis de tiempos. 

Se han mostrado como ejemplo diferen- 
tes posibilidades de la señal de entrada, pu- 
diendo observarse el efecto del desfase del 
pulso de reloj. También queda patente la im- 
posibilidad de registrar un fenómeno transito- 
rio de duración inferior a un pulso de mues- 
treo, a menos que coincida con el flanco del 
reloj. Otro caso de difícil estimación es el va- 
lor que adopta un bus de tres estados cuando 
todas las salidas están desactivadas. El nivel 
flotante que resulta puede ser 1 ó 0, según la 
capacidad del circuito o incluso el tipo de son- 
da usado. A veces se fuerza ligeramente me- 
diante una resistencia a la tensión de alimen- 
tación, para que sea un nivel conocido. 

Para que la forma de las señales queda- 
ra bien representada sería necesario utilizar 
un período de muestreo varias veces inferior 
al menor tiempo a resolver. Los tiempos de su- 
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bida de las señales pueden afectar a la forma 
de onda registrada, si es que son apreciable- 
mente superiores al tiempo de muestreo. De 
todas maneras, lo que tiene verdadero interés 
es la relación entre las diferentes señales re- 
gistradas en el mismo pulso de reloj, para po- 
der determinar la precedencia y las relacio- 
nes causa-efecto entre las diferentes unida- 
des. 

Un aspecto importante a tener en cuen- 
ta es que la carga de las señales en los regis- 
tros de almacenamiento intermedio y, en ge- 
neral, en cualquier elemento con memoria, re- 
quiere de un tiempo de mantenimiento previo 
a la carga (setling time) y otro de manteni- 
miento después del pulso de carga (holding 
time). Estos tiempos son, en general, de unos 
pocos nanosegundos para las tecnologías TTL 
y CMOS, pero pueden ser significativos en al- 
gunas aplicaciones. 

En la modalidad de uso como analiza- 
dor de estados el reloj que fija los instantes de 
muestreo es el del sistema, con algún desfase 
para ajustarse a las necesidades. El reloj nor- 
malmente será periódico, pero podría ocurrir 
que dentro del ciclo aparecieran subciclos de 
duración diferente, teniendo entonces que 
considerar cada muestra como indicación de 
la existencia de un estado y su posición exac- 
ta en el tiempo debería fijarse de acuerdo con 
las señales capturadas, Esta modalidad permi- 
te la realización del muestreo condicionada a 
la producción de algún fenómeno transitorio y 
que también afectará a la señal de disparo. Por 
ejemplo, para seguir la secuencia de estados 
que se producen al atender la unidad central 
un fenómeno asíncrono con el proceso, como 
son las interrupciones, se condicionará el dis- 
paro a la señal que produce la interrupción y 
el teloj a la entrada en una determinada di- 
rección de memoria. 


Fig. 2. Señales muestreadas para análisis de estados. 


Puede apreciarse que si el reloj no es 
periódico, el resultado puede diferir aparen- 
temente de la señal original, aunque al ser las 
muestras del propio sistema se supone que po- 
seerá las transiciones en instantes relaciona- 
dos. 
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Si el registro se efectúa utilizando algu- 
na señal para marcado del instante que 
corresponde al contenido conocido en un con- 
junto de posiciones del sistema, podría anali- 
zarse la secuencia almacenada mediante un 
programa que convierta cada palabra en el 
nemotécnico utilizado para la representación 
de la instrucción o del estado del sistema. Esta 
es una de las principales ventajas de utilizar 
un ordenador personal como control de la tar- 
jeta, frente a un equipo específico, por muy 
adaptado a la resolución del problema que 
esté. 

Una aplicación corriente del analizador 
consiste en realizar el registro estadístico del 
número de veces que se ejecuta una determi- 
nada secuencia de código. Para ello se condi- 
ciona el disparo a las configuraciones que se 
desea rastrear y se almacena en contadores 
el número de veces que se produce cada una 
de ellas. Una representación en diagrama de 
barras del histograma de frecuencias puede 
ayudar en la optimización del sistema. 


Programas de control de la tarjeta 


Para la realización de los análisis de sis- 
temas hemos de contemplar varias partes del 
programa: 


— Inicialización según la aplicación 
concreta, determinando qué partes del circui- 
to están activas al comienzo y cuál será la se- 
cuencia de almacenamiento. Durante la inicia- 
lización conviene identificar cada señal para 
que luego resulte cómoda la interpretación de 
los resultados. Un menú de definición de se- 
ñales permitirá hacer el trabajo más fácilmen- 
te. 

— Captura de las muestras. General- 
mente se comienza el almacenamiento al pro- 
ducirse la señal de disparo, pero podría rea- 
lizarse de forma continua, para detenerse al 
producirse la condición deseada, teniendo en- 
tonces en la memoria la secuencia de estado 
que condujo al fenómeno. 

— Extracción de las muestras tomadas 
y transferencia a la memoria del ordenador. 

— Presentación de los resultados, se- 
leccionando la forma más idónea según la apli- 
cación: 

e Secuencia de unos y ceros. 

e Palabras completas en notación hexa- 
decimal. 


e Formato gráfico como de oscilosco- 
pio. Incluirá la posibilidad de compresión, ex- 
pansión y desplazamientos. 

e Formato gráfico bidimensional de es- 
tados. 

e Formato nemotécnico, si el sistema es 
conocido y se capturó el contenido del bus de 
datos. 


— Funciones de almacenamiento, res- 
tauración, comparación, salida por impresora, 
etcétera, de señales tomadas en diferentes en- 
sayos. 

— Búsqueda de una determinada con- 
figuración en los datos almacenados. 


Todas las funciones de manipulación de 
gráficos y ficheros estarán disponibles para 
hacer más útiles los datos del ensayo y que se- 
rán dependientes de la máquina y de las ne- 
cesidades específicas. Es fundamental que el 
funcionamiento global del sistema sea cómo- 
do para poder repetir fácilmente cualquier 
ensayo y verificar que el problema es consis- 
tente. Para hacer más rápida la utilización del 
programa, convendrá usar una versión compi- 
lada, pues los ejemplos que se muestran, aun- 
que válidos para hacer la depuración, resul- 
tan un poco lentos para aplicaciones reales. 


10 REM Y Xx XA AAA AAA AA AAA A 
20 REM PROGRAMA DE CONTROL DEL ANALIZADOR LOGICO 


50 REM EN EL IBM PC 


60 REM Xx xk A XRA AA AAA AAA AA AAA xs 


61 OPTION BASE O 
62 DEFINT A-Z 


65 REM DESCRIPCION DEL PUERTO DE CONTROL: 
74 REM Xx % xXx «DEFINICION DE ESTADOS DE CONTROL. * * * A 
73 REPOSO=%HO: REM NIVELES DE REPOSO AL ARRANCAR 


76 ACTIVAR=2H18: 
77 CONTAR=%H8: 


REM ACTIVA LA TOMA DE MUESTRAS 
REM PERMITE AVANZAR DIRECCION 


83 INCREMENTAL=%HO: REM LECTURA CON PULSO. DE- INCREMENTO 


394 INCREMENTAH=2H4 


85 INHIBEENTRADA=%H2: REM PARA LECTURA DE LA MEMORIA 


86 DIM DATOS(3000) 


88 N=100: REM NUMERO DE MUESTRAS 


89 Fis4="DATOSLA. DAT" 
90 REM XX xk *2%%x% 
100 PDATOS=%H201: REM DATOS 


DEFINICIÓN DE PUERTOS 


105 PCONTROL=8H203: REM BYTE DE CONTROL 
110 PESTADO=:H203: REM BYTE DE ESTADO 


113 KEY OFF 
120 CLS 


130 PRINT " PROGRAMA DE CONTROL DEL ANALIZADOR LOGICO" 


140 PRINT 


142 PRINT ” VERIFIQUE CONTROLES DE SEÑALES,” 
143 PRINT ” PALABRA DE DISPARO Y BASE DE TIEMPOS” 


149 PRINT 


150 PRINT ” SELECCIONE OPCION: ” 


160 PRINT 


170 PRINT ” 1.—ACTIVAR MUESTREO” 


190 PRINT 


200 PRINT ” 2.—PRESENTAR RESULTADOS" 


210 PRINT 


220 PRINT " 3.-"GUARDAR EN DISCO" ; Ñ 


230 PRINT 
240 PRINT ' 
260 PRINT 
270 INPUT "OBPCION="30PCION 


4.-TERMINAR"” 


280 IF OPCION<1 OR OPCION>4 THEN BEEP: GOTO 120 
2790 ON OPCION GOSUE 1000,2000, 3000, 4000 


295 1F OPCION=4 THEN END 
300 GOTO 120 
970 REM Xk xk * 
1000 CLS 


1010 PRINT "TOMANDO MUESTRAS” 


ACTIVACION DE TOMA DE MUESTRAS 


1170 REM ESTABLECE PARAMETROS DE MUESTRED 


1200 QUT PCONTROL, ACTIVAR 
1210 FOR I=1 TO 10000 
1230 A= INP (PDATOS) 

1240 IF AX<>0 THEN 1210 
1250 NEXT I 


1260 PRINT "TERMINO TIEMPO MAXIMO DE TOMA DE MUESTRAS": RETURN 
1300 PRINT "FIN DE TOMA DE MUESTRAS" 


1305 OUT CONTROL, REPOSO 
1304 OUT CONTROL, CONTAR 
1310 FOR I=1 TO 2048 


1320 DUT CONTROL, INCREMENTAL 
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1330 
1340 
1350 
NEXT 1 
RETURN 
REMO Xx xx 
CLs 


FOR I=i TON 


NEXT 1 


RETURN 
REM A. Xx xx 


PRINT $1,N 
FOR I=1 TON 
PRINT $1,DATOS(I)> 
NEXT 1 
CLOSE * 
RETURN 


RETURN 


Programa de transferencia de datos 


Una vez activado el indicador de que el 
barrido ha terminado, o transcurrido un tiem- 
po superior al de la toma de muestras en el 
peor de los casos, se pueden extraer los dátos 
de la memoria exterior y transferirlos a un 
vector para su tratamiento y presentación. El 
programa simplemente consistirá en un bucle 
de incremento de posición del contador exte- 
rior y lectura del valor presente en el puerto 
de entrada. Previamente es necesario desco- 
nectar las salidas del registro de entrada que, 
como son de tres estados, es suficiente con po- 
ner el bit de control en 1, El incremento de la 
dirección de memoria accedida se realiza si- 
mulando un pulso de reloj, mediante el corres- 
pondiente bit de control. La memoria del al- 
mácenamiento intermedio presenta a su sali- 
da al bus de datos el contenido almacenado, 
simplemente con direccionar la posición, no 
siendo necesario ningún pulso de lectura. 

La opción de activación de la toma de 
muestras, cuando termina, realiza automática- 
mente la transferencia al vector DATOS. 


: Programa de presentación 
de las señales 


La observación de las señales captura- 
das es el objeto de nuestro experimento, Para 
facilitarlo al máximo deberemos disponer de 
un programa de presentación que utilice óp- 
timamente las posibilidades gráficas de nues- 


FUNCION DE PUESTA EN REPOSO 
REM GUARDA DATOS EN DISCO 
OPEN F1% FOR OUTPUT AS +1 
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QUT CONTROL, INCREMENTAH 

OUT CONTROL, INCREMENTAL 

DATOS (1)=INP(PDATOS) 

MENU DE PRESENTACION k k * 


REM INCLUIR LOS TIPOS DE PRESENTACION DESEADOS 
PRINT "INTEGRAR CODIGO DE PRESENTACION" 


PRINT HEXS$(DATOS(I233" "5 


INPUT "PULSE UNA TECLA PARA SEGUIR"; X+ 


*R xxx 


REM DEJA LA TARJETA EN REPOSO 
OUT PCONTROL, REPOSO 


tro equipo. El ejemplo que se presenta es una 
simple muestra de lo que podemos conseguir 
dedicándole tiempo al problema concreto. 
Esta es una de las ventajas de utilizar un or- 
denador: tenemos múltiples soluciones para 
cada problema, solamente limitadas por nues- 
tra imaginación. 


Presentación de las señales 
como unos y ceros 


El programa presenta las muestras 
como puntos luminosos o de un color tomando 
como eje horizontal el tiempo, que en este caso 
será el número de la muestra. En el menú de 
presentación podríamos seleccionar la mues- 
tra inicial a presentar y el número de ellas. En 
el ejemplo la señal se ha almacenado en un fi- 
chero y se lee de él cuando se necesita. 


10 REM PRESENTACION DE SEÑALES DIGITALES 
EN FICHERO DE DATOS 

20 REM T3 

30 SCREEN 0,0,0: KEY OFF 

40 DIM A(1000) 

50. VÉ(0)=": VÍ(1)=" 

60 FI$="SENO13" 

70 FOR I=1 TO 8; M()=20-1): NEXT 1 

90 GOSUB 2000: REM LEE LOS DATOS 

200 CLS 

210 SCREEN 0 

220 PRINT * ** REPRESENTACION CON CARAC- 
TERES “" 

230 PRINT * ESCALA DE TIEMPO EN PERIODOS 
DE MUESTREO" 

240 REM REJILLA 

280 FOR 1=6 TO 78 STEP 5 


260 FOR J=5 TO 22 STEP 4 

300 LOCATE ],] 

302 PRINT “.*; 

305 NEXT ] 

310 NEXT 1 

320 FOR I=5 TO 75 STEP 8 

330 LOCATE 4,1: PRINT USING “4 4f"1-5: 

340 NEXT 1 ! 

350 REM DEFINE IDENTIFICACION DE SEÑALES 
382 FOR J=1 TO 8 

384 LOCATE 4+2"],2 

386 PRINT "X*;]J; 

388 NEXT] - 

359 REM PRESENTA LAS SEÑALES COMO -Y 
360 FOR X=2 TO N 

365 XX=INT(255'AG0) 

370 FOR J=1 TO 8 

384 LOCATE 4+]'2,X+4 

386 PRINT V$(SGN(XX AND M())); 

388 NEXT J 

390 NEXT X 

420 WHILE INKEY$=": WEND 

500 END 

2000 REM LECTURA DE DATOS 

2020 OPEN "T",+1,F1$ 

2030 INPUT úl,N 

2040 PRINT "DATOS CONTIENE ";¡N+1;" VALORES" 
2070 FOR K=1 TO N 
2080 INPUT +11,A(K) 
2110 NEXT K 

2120 CLOSE 

2200 RETURN 


1 


Fig. 3. Salida gráfica como caracteres, 


Para poder observar secuencias de 
muestras más largas, deberemos definir en el 
programa un valor de comienzo, el cual se 
añadirá en el índice de selección en la mues- 
tra a presentar. 

Del programa de presentación median- 
te caracteres que recuerdan la forma de onda 
típica de un osciloscopio tiene interés el men- 
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cionar la forma utilizada para sacar cada bit in- 
dependientemente. Las sentencias 384-386 in- 
dican la forma cómo a partir del elemento del 
vector que representa a la muestra se obtiene 
cada bit por separado con la función AND y 
el elemento de un vector que contiene el bit 
deseado. El resultado puede ser 0 ó 1, En el 
primer caso se selecciona el carácter repre- 
sentativo del 0 y en el segundo el del 1, Como 
la función AND en BASIC da como resultado 
el valor del bit considerado es necesario ex- 
traer el signo, que en ese caso sí que será 0 
ó 1. .. 


s 


Presentación de señales en modo | 
gráfico 


Podemos representar las señales mues- 
treadas como si de un osciloscopio se tratase, 
utilizando la capacidad gráfica de cada orde- 
nador. El programa que se muestra utiliza el 
modo de alta resolución del IBM-PC, presen- 
tando 8 señales simultáneamente. Cada señal 
lleva una identificación correspondiente a la 
entrada por la que se tomó, que debería coin- 
cidir con la etiqueta puesta en la sonda. 

En el gráfico también se muestran unas 
marcas, entre cada dos señales, para poder 
referenciar cada muestra con el instante de 
muestreo. 


10 REM PRESENTACION DE SEÑAL EN FICHERO 
DE DATOS 
20 REM T2 
30 SCREEN 0,0,0: KEY OFF 
40 DIM A(1000) 
50 VRES=50: HRES=600: DESPX1=10: DESPY1=30 
60 Fl$="SENI3.DAT" 
70 FOR I=1 TO 8: M(D=2(1-1): NEXT 1 
90 GOSUB 2000: REM LEE LOS DATOS 
200 CLS 
210 SCREEN 2 
220 PRINT * ** REPRESENTACION GRAFICA DE 
DATOS DIGITALIZADOS **" 
230 LINE (0,20)-(639,180),1,B 
240 FOR 1=40 TO 630 STEP 20: ' REJILLA 
250 FOR J=40 TO 160 STEP 32 
300 PSET (1,10+)),1 
310 PSET (1,11+)),1 
320 NEXT ] 
330 NEXT 1 | 
* 380 REM IDENTIFICACION DE SEÑALES 
382 FOR J=1 TO 8 
354 LOCATE 4+2J,2 
356 PRINT *X*J; 
388 NEXT ] 
359 REM REPRESENTACION DE LAS SEÑALES 
360 FOR X=2 TON. 
365 XX=INT(255'A(0) 
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370 FOR J=1 TO 8 

384 PSET (40+2*X,30-(J*16)-5'(SGN(XX AND M(J))) 
388 NEXT ] : 

390 NEXT X 

420 WHILE INKEY$=": WEN 

440 SCREEN 0,0,0 

500 END 

2000 REM LECTURA DE DATOS 

2020 OPEN “T',+tL,FI$ 

2030 INPUT +t1,N 

2040 PRINT “DATOS CONTIENE “N+1;" VALORES" 
2070 FOR K=1 TO N 

2080 INPUT +1,A(K) 

2110 NEXT K 

2120 CLOSE 

2200 RETURN 


Fig. 4. Salida gráfica. 
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La ampliación de la señal en la repre- 
sentación gráfica simplemente consistirá en la 
reproducción del nivel del número de puntos 
correspondientes a la ampliación. No tendre- 
mos más información, pero estará más fácil- 
mente analizable. 


Conclusión 


Con el circuito y los programas mostra- 
dos pueden ampliarse las posibilidades de 
nuestro taller de forma importante y con las 
adaptaciones pertinentes a cada máquina nos 
permitirá resolver numerosos problemas y 
afrontar nuevos proyectos con la seguridad de 
que vamos a poder analizarlos de forma rápi- 
da y eficiente. 


Es conveniente recalcar que, si bien el 
sistema será útil para nuestras aplicaciones, 
queda un poco lejos todavía de la potencia de 
los equipos comerciales actuales, sin que por 
ello debamos retraernos de pensar en su mon- 
taje. La dificultad es sólo un poco mayor que. 
el montaje de unas cuantas sondas lógicas, con 
unos resultados muy superiores a su coste. 


APRENDER CON EL ORDENADOR 


NATURALEZA 
Y TECNOLOGIA 


Física: teoría de choques 


N este capítulo vamos a tra- 
tar la teoría elemental de 
choque entre dos cuerpos. 
Es un hecho evidente que 
no todos los cuerpos de la 
naturaleza se comportan 
igual ante un choque. Por 
ejemplo, es distinta la mane- 
ra de chocar entre sí dos bolas de billar que 
dos automóviles, o la de una mosca contra un 
tren. Todo esto nos hace pensar que existen 
diversos factores inherentes a cada cuerpo 
que les hace comportarse de una manera de- 
terminada en un choque con otro objeto. 


Choques 


Hemos dicho anteriormente que el cho- 
que de dos cuerpos depende de diversos fac- 
tores. Uno de esos factores determinantes es 
la característica elástica del cuerpo. Durante 
el choque se producen en ambos cuerpos de- 
formaciones, creándose en el interior de ellos 
fuerzas elásticas que se oponen a la deforma- 
ción. 

Otro factor importante es la energía ci- 
nética. Como ya sabemos, la energía cinética 
es función de la masa del cuerpo y de su velo- 
cidad: 


Ec = 1/2 - m - v? 


Pues bien, si las deformaciones se pro- 
ducen dentro del límite elástico de los cuer- 
pos, éstos recuperan su forma primitiva, de- 
volviendo toda la energía cinética que habían 
absorbido en el choque. El choque en que esto 
se verifica se denomina elástico y en él hay 
conservación de energía cinética. Es el ejem- 
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plo típico de las bolas de billar, o de una'pe- 
lota de goma contra el suelo... Si en el choque 
las deformaciones superan las correspondien- 
tes al límite elástico (por ejemplo, el choque 
de un automóvil contra una pared), la energía 
necesaria para producir esas deformaciones 
se consume de la energía cinética en el mo- 
mento del choque, por lo que la energía ciné- 
tica no se conserva como en el caso del cho- 
que elástico. Este choque se denomina choque 
inelástico. 

En realidad, se presentan todos los ca- ' 
sos posibles intermedios entre el choque elás- 
tico e inelástico, llamado choque parcialmen- 
te elástico, en el que introducimos un paráme- 
tro definido como el CR (coeficiente de restitu- 
ción). 

Vamos a realizar un pequeño estudio de 
cada uno de ellos: 


to 


ANTES 


v2 
vi 
. Fig. 1. 


A. Choque totalmente elástico 


En el choque totalmente elástico se ve- 
rifica: 
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M1-"V14+M2:'M2=M1-V1'+M2-V2' (1) 


Que se cumple en cualquier tipo de 
choques y se denomina conservación de la 
cantidad de movimiento. 

Por ser un choque totalmente elástico 
también se conserva, como dijimos anterior- 
mente, la energía cinética antes y después del 
choque: 


1/2:M1-V2%+1/2:M2-V2*=1/2:M1-V12'+1/2-M2-V2* (2) 


De las ecuaciones (1) y (2) sacamos des- 
pejando las velocidades finales: 


, MI-M2 M2 
a O MA 

, Ml M1-M2 
vaa M1+M2 vi M1+M2 ve 


B. Choque inelástico 


Si los cuerpos que chocan se compor- 
tan de forma totalmente inelástica, toda la de- 
formación producida en el choque se conser- 
va. Al no haber reacción elástica, los dos cuer- 
pos quedan unidos después del choque, es de- 
cir, que: 


M = Ml + M2 
V'=V1+V2 
M1-V1+M2-V2 
V V2= ds Y IR OS 
M1-V1+M2-V2=(M1+M2)"V'=V MI+M2 


y la pérdida de energía cinética es: 
M1-M2-(V1-V2Y 


ES, 2(M1+M2) 


10 REMERE REA REA REAEAERA LAA ADA 
20 ES PROGRAMA 


DE 
CALCULO DE PARAMETROS 


40 REMX 
50 REMK* EN CHOQUES ELASTICOS 
60 REMK E INELASTICOS 


a e ERAAARAEA RENE REA AAA 


x 
* 
ES 
x 
* 


$ 
* 


$ REM xx da OA nos ah? 14 


100 REM* PROGRAMA VALIDO PARA 
110 REMK AMSTRAD, 
120 REM* SPECTRUM, COMMODORE Y 
130 REMx 


A 


MSX x 
140 REMEEKIRALA RARA RARA LAIA ARAS 


150 CLSs 
160 PRINT 
170 PRINT 


"ESTE PROGRAMA CALCULA” 
"LA MASA, VELOCIDAD Y * 


C. Choque parcialmente elástico 


Los choques que existen en la naturale- 
za nunca son totalmente elásticos, pues la 
energía cinética antes y después del choque 
es muy difícil que se mantenga debido, sobre 
todo, a pequeños efectos no deseables, como 
el rozamiento de la bola de billar contra la 
mesa, la pequeña cantidad de calor despren- 
dida en el choque o la resistencia del aire al 
movimiento. Según esto, un choque que consi- 
deramos totalmente elástico no será tal, sino 
será un choque parcialmente elástico con un 
coeficiente de restitución muy próximo a 1 
(CR=1 implica choque totalmente elástico). 

En el choque parcialmente elástico se 
cumple que: 


V2 -VI' = 
donde 0 < CR < 1. 


Entonces, para un choque totalmente 
elástico, se verifica que CR=1 y en un choque 
totalmente inelástico CR=0. 

Y las velocidades finales serían: 


M1-M2:CR M2-(14+CR) -V2 


CR - (V1 - V2) 


Via Y a 
, MI-I+CR) | M2-MI1-CR . 
hs M1+M2: M1+M2 1 
Y la variación de energía cinética: 
e MECA MISMA: cr tala 
A 2 M1+M2 esta 


que para CR=1 —choque totalmente elástico—, 
es nula. 


180 PRINT "CANTIDAD DE MOVIMIENTO" 

190 PRINT "DESPUES DEL CHOQUE” 

200 PRINT "CALCULO DE UN CHOQUE ELASTICO O ” 
210 INPUT "PARCIALMENTE ELASTICO (E/P) "3H$ 
220 PRINT :PRINT 


230 IF H$<>"E" AND H$<>"pP” 
240 1F H$="E" THEN GOTO 280 


THEN PRINT "ERROR DE ENTRADA":G0TO 200 


250 INPUT "INTRODUCIR VALOR DEL COEF. RESTITUCION (O<COEF.REST<1)"3CR 
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GOTO 290 
LET CR=1 
INPUT "MASA EN KGR. 


LET E2=E1-AT 


IF Es1 THEN GOTO 450 


PRINT 
END 


Comentario del programa 


La realización del programa es bastan- 
te simple. Se distinguen dos zonas bien defi- 
nidas, la zona de adquisición de datos y la 
zona de cálculo. Las fórmulas utilizadas son las 
del choque parcialmente elástico, que depen- 
diendo del coeficiente de restitución se com- 
porta como elástico, inelástico o parcialmente 
elástico. 


Si el coeficiente de restitución es 0, los 
dos cuerpos permanecen unidos, de ahí que 
la velocidad sea única. 


MATEMATICAS 


2 Cálculo de la matriz traspuesta 
e inversa 


Para la realización de este programa 
nos hemos basado en el programa de cálculo 
de determinantes editado anteriormente, y 
pretendemos completar el capítulo de matri- 
ces ya desarrollado en esta colección. 


En el campo de los números reales, 


existe una propiedad conocida por todos, que- 


es la existencia de elemento inverso, esto es, 

dado un número a € R, a <> O, sabemos que 

existe otro número b e R, que verifica que: 
a:b=1. 


» a 1 
Está claro que ese número b = a 
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IF CR>1 AND CR<1 THEN PRINT "COEF. REST. NO VALIDO":GO0TO 250 


DEL CUERPO 1"3M1 

INPUT "MASA EN KGR. DEL CUERPO 2*"3M2 

INPUT "VELOCIDAD DEL CUERPO 1 (METROS/SEG.)"3V1 
INPUT "VELOCIDAD DEL CUERPD 2 (METROS/SEG.)"3V2 
LET El=.Sk((M1RX(V172))+(M2x (V2"2))) 

PRINT "ENERGIA CINETICA ANTES DEL CHOQUE= "3E1 
LET AT=((1-CR"2)£M1xM2k (V2-V1)2) /(2% (M1+M2)) 


PRINT "ENERGIA CINETICA DESPUES DEL CHOQUE= "3E2 
PRINT "PERDIDA DE ENERGIA CINETICA EN EL CHOQUE= "5 AT 
LET Fi=((M1-M2XCR) KV 1+ (M2k (1+CR) )%V2)/ (M1+M2) 

LET F2=((M2-M1%KCR)XV2+(M1% (1+CR) )KV1)/ (M1+M2) 


PRINT "VELOCIDAD FINAL DEL CUERPO 1= "3F1 
“VELOCIDAD FINAL DEL CUERPO 2= "3F2 


PRINT "LA VELOCIDAD DEL CONJUNTO ES= "3Fi 


También algunas matrices poseen esta 
propiedad, pero no todas. Veamos cuál es el 
conjunto de las matrices que lo cumplen: 

Sea A matriz cuadrada, es decir, que 
tiene el mismo número de filas que de colum- 
nas, y sea el determinante de A, DET(A) <> 0, 
entonces se verifica que existe una matriz B, 
también cuadrada, tal que: 


(A) -(B)= 1 


Donde la matriz B se obtiene hallando 
la traspuesta de A y dividiendo cada término 
por el determinante de A. La demostración de 
este teorema se sale de nuestras pretensiones, 
si bien está en cualquier libro elemental de ál- 
gebra. 


Pero en la definición anterior hemos uti- 
lizado el término "traspuesta de A” sin haberlo 
definido previamente. Veámoslo con un pe- 
queño ejemplo: 


2 09 140 
(A) =|4 7 9|su traspuesta es T((A)) =12 7 9 
083 593 


Es decir, trasponer una matriz es inter- 
cambiar sus filas por columnas. 
La matriz inversa será, pues: 


1/|A] 4/14]  0/lA]l 
((A)=(B)= [2/14]  7/141 9Y/|A] 
5/|A] 9/|A]  3/lA]| 


La matriz inversa se utiliza muchísimo 
en álgebra lineal para problemas de cambio 
de base, de resolución de ecuaciones... 


APRENDER CON EL ORDENADOR 


10 REM RECEXRALALERREE ARE RE RARARLA AAA RARE 
20 REM x CALCULO DE MATRICES INVERSAS x 
30 REM £ VALIDO ' 
40 REM x PARA IBM-PC, MSX, AMSTRAD, k 
50 REM £ COMMODORE, SPECTRUM e 
60 REM EXKERXERARAA ALA EAEERARA KE RA REA KA RARA AAA 


M 

TO REM RANA OIL ON 
B0 REM k ORDEN DE LA MATRIZ k 
90. REM AREA RAR AAA II 
100 INPUT"DRDEN DE LA MATRIZ (SOLD HASTA CUATRO) "50 
110 IF 0>4 OR 0<2 THEN PRINT"SOLO HASTA RANGO CUATRO":GOTO 100 

. 120 DIM X(0,0),Y(D,0),A(0,0),Z(0),T(0,0), 
LIO REM AAC IIA 
190 REM £ VALORES DEL DETERMINANTE k 
150 REM RIA OI 
160 PRINT"INTRODUZCA LOS VALORES DE LA MATRIZ" 
170 FOR F=1 710,0 
180 FOR C=1 TO D 
190 PRINT"FILA "sF;5 
200 PRINT"COLUMNA "505 
210 INPUT" "yX(F,C) 
220 NEXT C 
230 NEXT F 
240 1F 0>2 THEN GOTO 300 
ZO REM RIO OOOO 
260 REM k DETERMINANTE DE ORDEN 2 k 
270 REM RARA AA 
280 LET R=X(1,1)%X(2,2)-X (1,2) NX (2,1) 
290 GOTO 570 
300 IF 0>3 THEN GOTO 430 
10 REM IRIS KE 
320 REM * DETERMINANTE DE ORDEN 3 k 
TIO REM MIRIAM OIOOOIOIDII A 
340 FOR I=1 TO O 
350 FOR J=1 TOD 0 
360 LET A(I,J)=X (1,3) 
370 NEXT 3 
380 NEXT 1 
390 GOSUB 790 
400 LET R=P 
410 GOTO 670 
420 REM KRRRELALRIRRAREA ERE AE RIA ALA RE RAE REAL 
430 REM k DETERMINANTE DE ORDEN 4 * 
440 REM ERERERAR RENE AER ERRE RIA ERA IRR 
450 FOR D=1 TO O 
460 GOSUB 860 
470 FOR F=2 TO O 
480 FOR C=1 TO O 
490 LET Y(F-1,C)=Y(F,C) 
500 NEXT C 
510 NEXT F 
520 FOR F=1 TO 0-1 
530 FOR C=1 TO 0-1 
540 IF D<>D THEN Y(F,C)=Y(F,C+1) 
550 NEXT C 
560 NEXT F 
570 GOSUB 700 
580 BOSUB 790 
590 LET Z(D)=P 

+» 600 NEXT D 
610 FOR F=1 TO O 
, 620 LET ReR+(-1)"(1+1)8Z (F)XX(1,F) 

630 NEXT F 
GAO REM OIR Io 


650 REM X SALIDA DEL RESULTADO DEL DETERMIN.  k£ 
660 REM EXAARHERRENIRE CAR RARERERER E AAA RARA RAR 
670 PRINT"EL VALOR DEL DETERMINANTE ES *“;R 

673 PRINT "PULSA ENTER PARA CONTINUAR” 

676 INPUT ws 

680 GOTO 940 

690 REM EXEREXARESAE AE XERAL A RIA AA AAA RARA RERRA 
700 REM Y CALCULO DE ADJUNTOS DE ORDEN 3 í 
71O REM A KEERARARE RENE RAE ARA RAR ALE AAA ERA RARA 
720 FOR 1=1 TO 0-1 

730 FOR J=1 TO O-1 

740 LET A(1,3)=Y(1,J3) 

750 NEXT J 

760 NEXT 1 

770 RETURN 

780 REM AAA OOOO OOOO IO A 
790 REM k CALCULO DEL DETERMINANTE DE ORDEN 3 £ 
800 REM OR IO III IO A 
810 LET P=A(1,1)£(4(2,2)£A(3,3)-A(2,3)XAM(3,2)) 
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RETURN 
REM 
REM 
REM 
FOR 1=1 TO O 

FOR J=1 TO O 

LET Y(1,J)=X (1,3) 
NEXT J 

NEXT I 

RETURN 


920 

930 

940 

950 

960 

970 

980 

990 

1000 
1010 
1020 
1030 
1040 
1045 
1046 
1050 
1060 
1070 
1080 
1090 
1100 
1120 
1130 
1140 
1150 
1160 
2000 


PRINT 
FOR F=1 TO O 

FOR C=1 TO O 

LET T(F,C)=X(C,F) 


NEXT C 
NEXT F 


INPUT Ws 


PRINT "LA INVERSA SERA: ” 
PRINT 

FOR F=1 TO O 

FOR C=1 TO O 


NEXT C * 
NEXT F 
END 


Comentario del programa 


El programa consta de tres partes muy 
bien definidas: 


— El cálculo del determinante. 


En su día ya se explicó ampliamente el 
desarrollo de este programa. Basta decir que 
el determinante mayor que puede calcular es 
de orden 4. Esto implica que el rango de la ma- 
triz que queremos invertir tiene que ser de or- 
den menor o igual que cuatro. 


— La trasposición de la matriz. 


La operación de trasposición de la ma- 
triz es sumamente sencilla. Lo que se preten- 
de con los dos bucles FOR..NEXT anidados es 
intercambiar la posición de las filas y las co- 
lumnas, por eso asignamos a T(F,C) = X(C,P). 
Obsérvese que C y F están intercambiadas. 


— El cálculo de la inversa. 
Para calcular la inversa lo único que he- 


REMERRRE REA LAR ARAE RA REZAR 


20 REMK PROGRAMA 

30 REMÉ DE ES 
40 REMX REPASO DE t 
50 REM* FORMAS DE GOBIERNO * 


REMEXEEXE RA RENA RARIRA ERE 


PRINT "T("3F3","303")= "3T(F,C) 
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LET P=P-A(1,2)X(A(2,1)xA(3,3)-A(2,3)XA(3,1)) 
LET P=P+A(1,3)x(A(2,1)%A(3,2)-A1(2,2)1M(3,1)) 


EREKERRELE REX ERE XA RARE RA AEREA KARA RARE 
%£ DETERMINANTE AUXILIAR 2 
ERICA RERE KAR ARAL AA AAA ARA RARA RARA AAA 


REM KAXEXALKELA RRE REREA AAA E RADA LE RAFA RARA RARA 
REM £ CALCULO DE LA TRASPUESTA É 
REM ERRE AA 
PRINT " LA TRASPUESTA SERA: * 


PRINT "PULSE ENTER PARA CONTINUAR" 


REM REXEKKERREARE RENE AER ELER KARA RCA RA RARA 
REM *£ CALCULO DE LA INVERSA É 
REM OXEKEXEXERR RA ALAN A ARALAR RARE RARA LARA 
1F R=0 THEN PRINT"NO EXISTE LA INVERSA DE ESTA MATRIZ":GOTO 2000 


PRINT "1("5F3","505")= "3T(F,C)/R 


mos hecho ha sido dividir cada elemento de 
la matriz por el resultado del determinante, 
hallado previamente en la primera parte. 


SOCIEDAD 
Formas de gobierno 
en el mundo 


Este programa es un pequeño test para 
comprobar sus conocimientos de las distintas 
formas de gobierno en el mundo. Debido a la 
gran variedad de sistemas de gobierno, los 
hemos agrupado en: 


— Monarquía parlamentaria. 
— Comunismo. 

— República. 

— República islámica. 


No obstante, este programa se puede 
ampliar, modificar o corregir con nuevos pal- 
ses o nuevas formas de gobierno en los países 
ya especificados. 


APRENDER CON EL ORDENADOR 


70 REM 

BO REM ERERAEREEARARALA LALA AEREA AA 
90 REM £ VALIDO PARA IBM-PC, MSX 2 
100 REMk AMSTRAD , COMMODORE x 
109 REM%* Y SPECTRUM Es 


110 REMERARAIARA AA KEXIERIFRELERALALA 

120 PRINT "ESTE PROGRAMA SIRVE PARA COMPROBAR” 

150 PRINT "SUS CONOCIMIENTOS SOBRE LOS DIFERENTES” 
140 PRINT “PAISES Y SUS RESPECTIVAS FORMAS DE * 


150 PRINT "GOBIERNO" 
160 DIM 6$(20,2) 

170 LET P=0 

180 FOR A=1 TO 20 
190 FOR B=1 TO 2 
200 READ G$(A, B) 

Z10 NEXT B 

220 NEXT A 

230 FOR A=1 TD 20 


250 PRINT "QUE FORMA DE GOBIERNO TIENE "y6$(A,1) 


e 260 LINE INPUT R$ 


270.-1F 6$(A,2)=R$ THEN PRINT "RESPUESTA ACERTADA"1LET P=P+12G0TO0 290 
280 PRINT "RESPUESTA INCORRECTA: LA RESPUESTA CORRECTA ES "56$(4,2) 


290 NEXT A 
300 CLS 


310 PRINT "RESPUESTAS CORECTAS "pP 


1000 DATA "ESPAÑA", "MONARQUIA PARLAMENTARIA" 


1010 DATA  "U.R.S.S”, "COMUNISMO" 


1020 DATA "REINO UNIDO", "MONARQUIA PARLAMENTARIA" 
1030 DATA "MALASIA", '"MONARQUIA PARLAMENTARIA" 


1040 DATA "ITALIA”, "REPUBLICA" 
1050 DATA "CUBA", "COMUNISMO" 


1060 DATA "REINO UNIDO", "MONARQUIA PARLAMENTARIA" 


1070 DATA “E.E.U.U.", “REPUBLICA” 
1080 DATA “INDIA”, "REPUBLICA" 


1090 DATA "ARABIA", "MONARQUIA PARLAMENTARIA" 


1100 DATA "R.D.A.”, "COMUNISMO" 


1110 DATA "COREA DEL NORTE", "COMINISMO" 
1120 DATA "IRAN","REPUBLICA ISLAMICA" 


1130 DATA "ARGENTINA", "REPUBLICA" 


1140 DATA "SUECIA", "MONARQIA PARLAMENTARIA” 


1150 DATA "R.F.A”, "REPUBLICA" 


1160 DATA *BELGICA”,"MONARQUIA PARLAMENTARIA" 


1170 DATA "IRLANDA”, "REPUBLICA" 
1180 DATA "ANGOLA", "COMUNISMO" 


1190 DATA "JAPON", "MONARQUIA PARLAMENTARIA" 


Comentarios al programa 


El programa consiste básicamente en 
cargar una matriz de datos, la G$(), con las 
preguntas y las respuestas. Para ello utiliza- 
mos 'una matriz N x 2, donde N es el número 
de países, y en cada fila almacenamos el país 
y la forma de gobierno correcta. Los datos es- 
tán en el programa almacenados en DATA, y 
accedemos a ellos a través de READ. 

Llevamos también una cuenta de pre- 
guntas acertadas en la variable numérica P. 


PARA LOS MAS JOVENES 


== Programa para comprobar 
los reflejos 


Este programa sirve para poder com- 
probar tus reflejos ante un determinado estí- 
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mulo. La importancia de la capacidad de reac- 
ción en una persona ante determinadas cir- 
cunstancias es muchas veces crítica, y este 
programa comprueba aproximadamente tu 
capacidad de respuesta. 


Cuando ejecutes el programa tendrás 
que pulsar ENTER (=RETORNO DE CARRO) 
una vez que estés preparado. En la parte su- 
perior de la pantalla se imprimirá: 


"PREPARADO, LISTO..." 


En cuanto aparezca “¡Y A!!” deberás pul- 
sar lo antes posible la barra de espacio en 
blanco. Según la rapidez de respuesta el or- 
denador te puntúa de 0 a 100. Una buena pun- 
tuación es más de 80 puntos, regular de 50 a 
80, y menos de 50 puntos indican que tus re- 
flejos no andan muy bien. 


REMXx 
REMX 
REMX 


35338885 


80 REMK 


DE 
TEST DE REFLEJOS 


PROGRAMA VALIDO PARA 


90 REMk AMSTRAD, IBM Y MSX 


ES 
100 REMKEXAXAXXA LE XA XL KAKI: AR ALAERARALES 


110 CLS 


120 PRINT "pulsa barra espacio” 


130 PRINT "cuando empiecen las estrellas” 
140 INPUT" PULSA ENTER CUANDO ESTES LISTO"3A$ 


150 CLS 


160 PRINT "PREPARADO, LISTO. » +." 
170 X=(RND(100)) 20000 
180 FOR N=1 TO X 


190 NEXT 


N 


200 LOCATE 1,18:PRINT "¡iva! !* 
210 HS=INKEY$ 
220 IF H$=" " THEN GOTO 260 


230 C=C+1 


240 LOCATE 20,C:PRINT"k*" 


250 GOTO 


210 


260 LOCATE 21,1:PRINT "PUNTOS" 100-C 


270 REMÉEKEXAKA LA REXKAKALALA LAR RALA RAS 
280 REMX MODIFICACIONES PARA SPECTRUME 
290 REMÉXKXAERERALRLAIA LA LÍRARAKIADE dE 


300 REM 


REM IR III AAA 
PROGRAMA * 


£ 
x 


REMERERA XK ERRE LE REKO AEREA EA ERRE 
REM 
REM IO RRA AAA 


31 0 REMIIOOOOIOOODIOOOOOIO AAA 
320 REMX SUSTITUIR LAS SIGUIENTES LINEAS * 


330 REMX 
340 REMK 


200 PRINT AT 1,185"¡¡YA!!" 
240 PRINT AT 20,C3"x*%" 


x 
$ 


350 REMA 260 PRINT AT 21,43 "PUNTOS”5 100-CxX 
360 REMAKKEKE RELE REO AERRRERARESE 
370 REM odio ad 


380 REMk MODIFICACIONES PARA COMMODORE 


390 REMO IO O 


400 ¿REMEX EXA RRARARERA RE RRA EXEARA EA A RAR RLAE 


410 REMX 
420 REMK 
430 'REMK 
440 REMXx 
450 REM 
460. REMX 
A70 REMX 
480 REMK 
490 REMX 
500 REMK 
510 REMX 
520 REMX 
530 REMX 


200 LET X=1B1LET Y=1 
201 GO SUB 1000 

202 PRINT "¡¡YA!!” 
240 LET X=CILET Y=20 
241 60 SUB 1000 

242 PRINT "x" 

260 LET X=11LET Y=21 
261 GO SUB 100 

262 PRINT "PUNTOS ”3100-C 
1000 LET TS=CHR$(19) 
1010 LET A$=CHR$(17) 
1020 LET D$=CHR$ (29) 
1030 PRINT Tó% 


PETER Ei 
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540 REMX 1040 FOT G=1 TO Y s 
550 REMA 1050 PRINT A$ * 
560 REM* 1060 NEXT G * 
570 REMA 1070 FOT Gui TO X * 
580 REM* 1080 PRINT D$ ps 
590 REME 1090 NEXT G A AE 
£00 REMK RETURN 4 
61 0 REMO OO IO A ERA 


' Comentario del programa 


Para la realización de «este programa 
hemos utilizado varios trucos, que vamos a ex- 
plicar ahora. 

Uno de los trucos es LET 
X=(RND(100))'20000, Con esto lo que hacemos 
es que el tiempo que tarda en salir ¡¡Y A!! no 
sea siempre el mismo, sino que varíe. Puede 
ocurrir, si tienes un ordenador muy rápido (un 
AT/IBM o similar), que todo ocurra demasia- 
do de prisa, no te preocupes, cambia el valor 
de “20000” por otro mayor y el tiempo será ma- 
yor. Si, por el contrario, tienes un ordenador 
lento, no tienes más que disminuir ese valor. 
No obstante, prueba a cambiar ese valor y ve- 
rás que el tiempo que tarda el ordenador en 
darte la respuesta es diferente. 

El otro de los trucos es utilizar la fun- 
ción INKEY$. Esta es una función que se utili- 
za muchísimo en juegos, y lo que hace es leer 
la tecla que tú están pulsando. Por eso cuando, 
tú pulsas la tecla de espacio, el ordenador lo 


detecta y te indica la puntuación que has obte- 
nido. 


PEQUEÑA HISTORIA DE LA INFORMATICA 


La Segunda Guerra Mundial 


IN duda alguna, la Segunda 
Guerra Mundial, y la guerra 
fría que se estableció poste- 
riormente entre las dos 
grandes potencias mundia- 
les, han contribuido notable- 
mente al desarrollo del or- 
denador, abriendo paso a 
una era distinta de las anteriores, la era de la 
Informática. 

Los científicos de todas las épocas han 
tenido que sufrir para sacar a la luz sus des- 
cubrimientos. Bien es cierto que algunos (los 
menos) disponían de recursos económicos que 
les permitían poderse dedicar a sus aficiones; 
pero también es frecuente que, aun habiendo 
llevado vidas ejemplares (desde el punto de 
vista científico), y disponiendo en el mejor de 
los casos de dinero, hayan sufrido incompren- 
siones, no se les haya apoyado lo suficiente, o 
hayan tenido que disponer de sus recursos 
personales y perderlos poco a poco, para po- 
der perseverar en sus estudios. ¡Y estamos ha- 
blando de los más afortunados! Los recursos, 
para investigación siempre han sido escasos. 
Menos en esta mitad del siglo XX, y en los Es- 
tados Unidos de América. La guerra hizo rea- 
lidad multitud de proyectos que existían en las 
meñites de sus creadores únicamente a nivel 
de sueños. Existió financiación suficiente para 
desarrollar miles de hipótesis. Y además se 
dieron unas condiciones muy especiales, que 
contribuirían muy eficazmente al desarrollo 
de la Informática. 

El Departamento de Defensa norteame- 
ricano tenía entre su personal a militares, que 
a la vez eran magníficos ingenieros, y que co- 
laboraron codo con codo con universitarios, in- 
vestigadores de primera fila, empresarios au- 
daces, etc. Ese fue el verdadero éxito: la ós- 
mosis existente entre Universidad, empresas 
y Ejército de los Estados Unidos. Como el Ejér- 
cito necesitaba tecnología muy avanzada, y 
disponía de recursos, para obtener lo que ne- 
cesitaba, no dudó en apoyarse en todo tipo de 
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personal civil (entre los que se encontraban 
personas de enorme talla). 

Entre otras tareas importantes a des- 
arrollar, se vio pronto la necesidad de crear 
unos enormes calculadores muy potentes, que 
el Ejército necesitaba principalmente para 
cálculos de balística, y posteriormente para 
cálculos relacionados con la energía nuclear, 
que estaban desarrollando. Aunque estos cal- 
culadores se habían diseñado pensando en 
ser utilizados durante la contienda, la verdad 
es que la mayor parte se terminaron una vez 
finalizada la guerra. De este período recorde- 
mos a Von Neumann, quizá una de las perso- 
nas que más contribuyó al progreso del orde- 
nador en esos años, y a los científicos-empre- 
sarios Eckert y Mauchly, infatigables, que pro- 
siguieron su camino separándose de su com- 
pañero Von Neumann. El ordenador que mar- 
có este período tan fructífero fue el ENIAC. 

La balística no era una ciencia simple- 
mente útil. En esos años su estudio era primor- 
dial. La guerra se había modernizado, y ya no 
la ganaba aquel que disponía de más hom- 
bres, o de hombres más valientes. Las armas 
habían comenzado a tener un papel funda- 
mental. Y entre ellas, los proyectiles, de todo 
tipo. A la vista de la enorme importancia que 
iba cobrando esta ciencia, el Ejército creó un 
laboratorio especial de investigación en balís- 
tica, el Ballistic Research Laboratory, que ins- 
taló en una pequeña localidad de Maryland, 
de nombre escocés: Aberdeen. 

Y, como antes hemos indicado, en este 
Laboratorio no sólo trabajaban militares. Ni si- 
quiera lo dirigía un militar: estaba regido por 
un consejo formado por cinco personas, de las 
que dos eran civiles, y las otras tres militares. 
Naturalmente, estos militares tenían también 
una magnífica formación científica, provenien- 
do del Massachussets Institute of Technology, 
principalmente. El director científico llegó al 
Centro de otra Universidad prestigiosa, Prin- 
ceton (en concreto del Institute of Advanced 
Studies). Von Neumann, relacionado también 
con Princeton, pertenecerá al consejo cientí- 
fico, 


Pero ¿Cuál era la tarea principal de este 
laboratorio? La creación de tablas de balísti- 
ca. Los proyectiles no eran ya simples bolas 
de piedra, o de metal, como en tiempos de los 
piratas. Eran muy caros, y resultaba de suma 
importancia que los artilleros desperdiciaran 
el mínimo material posible, acertando en el 
blanco a la primera. El dicho popular «Quien 
da primero, da dos veces» es sabiduría anti- 
gua pero sigue siendo válido con las técnicas 
modernas. 

Las tablas de balística son muy complejas. 
En ellas se pueden considerar muchos facto- 
res, entre los que mencionaremos el tipo de 
proyectil, su peso, situación del blanco, velo- 
cidad del viento, temperatura, etc.). Si sólo se 
consideran dos de estos factores, los funda- 
mentales, el alcance del proyectil y la altura 
del blanco, es necesario calcular entre 2.000 y 
4.000 trayectorias para obtener un dato fiable 
para un único grupo proyectil-cañón (la ope- 


Sabía usted que... ' 


Hagamos un pequeño resumen biográfico de 

la figúra de Von Neumann. 
Nació en Budapest (Hungría) en 1903. A los 
veintidós años ya se había doctorado en Matemáti- 
cas, aunque varios años antes ya escribía artículos 
sobre temas que le interesaban siempre en el cam- 
po de las Matemáticas. Con veinticuatro años pasó a 
la Universidad de Berlín, con el grado de «privatdo- 
zent», cargo que era muy difícil de obtener siendo 
tan joven, Este período fue muy fructífero, y en él Von 
Neumann escribió numerosos artículos de álgebra, 
mecánica cuántica y, en general, se interesó mucho 
por la resolución matemática de problemas de estra- 
tegia. 

Con veintisiete años se instala en los Estados 
Unidos, como lector asociado en la Universidad de 
Princeton, y es muy lógico que con la creación del 
Institute of Advanced Studies se le nombrara profe- 
sor permanente (al mismo tiempo que al padre de la 
Mecánica Cuántica, el profesor Einstein.) Von Neu- 
mann seguirá unido a esta Universidad, aunque co- 
laborará en proyectos en cierto modo externos a ella 
hasta 1955, año en el que fue nombrado por el pre- 
sidente Dwight Eisenhower miembro de la Comisión 
de Energía Atómica. 

Von Neumann ha sido el padre del ordenador 
actual. La estructura de sus primeras máquinas se ha 
conservado hasta nuestros días. Sus notables cono- 
cimientos matemáticos eran aplicables a numerosos 
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campos, como, por ejemplo, a los cálculos matermná- 
ticos de las reacciones que se llevarían a cabo du- 
rante la explosión de la bomba H. Su contribución a 
este proyecto, en Los Alamos, fue fundamental, ya 
que gracias a sus cálculos se pudieron detectar erro- 
res considerables en el diseño. Pero Von Neumann 
era un hombre universal, y también se interesó por 
otras disciplinas menos peligrosas y desagradables. 
En los últimos años de su vida estaba estudiando el 
cerebro humano desde distintos puntos de vista 
(neurofisiológico y psiquiátrico). Negó la suposición 
de que las neuronas no eran infalibles, demostrando 
matemáticamente que se podría construir un autó- 
mata todo lo fiable que fuera necesario, utilizando 
para ello elementos susceptibles de error (órgano 
mayoritario de Von Neumann). Todos estos trabajos 
eran realizados con el fin de reproducir mediante 
circuitos y de la forma más sencilla y esquemática 
posible un órgano que la naturaleza había creado 
con tanta perfección. 

Von Neumann era un hombre de trato muy 
agradable, detallista, refinado, cortés. Su apariencia 
física no era muy agraciada. Era grande, amplio de 
frente, ojos oscuros. Murió muy prematuramente, a 
la edad de cincuenta y cuatro años, de un cáncer de 
huesos. 


ración requería unas 750 multiplicaciones de 
diez cifras), y repetir la operación para cada 
posible par proyectil-cañón. 

Nuevas tecnologías de guerra se iban 
desarrollando con rapidez vertiginosa. Pero el 
Ballistic Research Laboratory no podía ir ab- 
sorbiendo el nuevo material que iba apare- 
ciendo. Y de qué servía disponer de un mate- 
rial moderno y eficaz si no se sabía manejar, 
y, por tanto, sacar partido de sus ventajas. En, 
ese período el laboratorio estaba absoluta- 
mente desbordado. Cada tabla tardaba unos 
dos meses en construirse, y la «cola» iba au- 
mentando hasta llegar a situaciones desespe- 
radas. En el verano de 1944 la situación llegó 
a ser insostenible, produciéndose una media 
de quince tablas por semana, siendo necesa- 
rias unas cuarenta. 

Sin embargo, el Ballistic Research Labo- 
ratory se había preocupado desde bastante 
antes de este problema, y había creado un pe- 
queño equipo a las órdenes de Vannevar Bush 
encargándoles desarrollaran un calculador 
capaz de abordar el problema. Era 1935, y las 
necesidades no eran acuciantes. 

A pesar de estas previsiones, al co- 
mienzo de la guerra, en el laboratorio, los cálcu- 


PEQUEÑA HISTORIA DE LA INFORMATICA 


Sabía usted que... 


Para calcular una única trayectoria de proyec- 
til, un matemático calculista trabajaba durante tres 
días, poniendo el máximo cuidado y atención, El ana- 
lizador diferencial del MIT, o el de la Moore School, 
de la Universidad de Pensilvania (en los Estados Uni- 
dos sólo contaban con esas dos máquinas), hubiera 
tardado entre quince o veinte minutos (aunque al 
cambiar de trayectoria hubiera sido necesario dis- 
poner de unas dos horas para cambiar todas las co- 
nexiones y cableados). 

Un matemático calculista, trabajando ocho ho- 
ras diarias en los cálculos, hubiera tardado unos 
trescientos años en crear una tabla, naturalmente, sin 
ayudarse de ningún tipo de calculadora, Con algún 
tipo de calculadora, el tiempo habría reducido mu- 
chísimo, ¡nada menos que a doce años! 

Para resolver el problema de la creación de la 
tabla, el ordenador MARK 1 hubiera tardado un tiem- 
po mínimo de unos seis meses, A partir de este pun- 
to, los tiempos se fueron rebajando hasta llegar al 
mejor del momento: el del analizador diferencial (del 
que hemos hablado), que sólo tardaría un mes). 


los de trayectoria se realizaban manualmen- 
te y eran realizados por mujeres, en su mayor 
parte, probablemente porque fueran más dis- 
ciplinadas y cuidadosas que los hombres. Se 
trataba de diplomadas en Matemáticas, que 
tardaban unos tres días en calcular una sola 
trayectoria, y así proseguían lenta y cuidado- 
samente en el cálculo de la tabla. El laborato- 
rio contaba entonces con unas cien mujeres 
calculistas. 

Pero el Ballistic Research Laboratory estaba 
además muy bien relacionado con varias Uni- 
versidades, especialmente con las más acti- 
vas, entre ellas la de Pensilvania y Princeton. 
En la Universidad de Pensilvania se encontra- 
ba la Moore School, fundada en 1923. Era, por 
tanto, una escuela de ingeniería electrónica 
muy reciente. Sin embargo, estaba magnífica- 
mente considerada. Disponía, además, de un 
Analizador Diferencial, dispositivo del que 
sólo existía otra unidad funcionando en el Mas- 
sachusetts Institute of Technology. Estas dos 
Universidades eran enormemente activas, fi- 
nanciado proyectos, contratanto profesores 
asociados de primera talla y organizando cur- 
sos incluso durante los veranos. 

Precisamente en uno de estos cursos de 
verano, financiado por el Ballistic Research La- 
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boratory, fue donde Hermann Goldstine, uno 
de los directivos del BRL, se puso en contacto 
con John Mauchly y Presper Eckert, el prime- 
ro director del Departamento de Física de Ur- 
sinus College, en Pasadena, y el segundo, un 
experto en tubos de vacío. 

El primer proyecto, el ENIAC, fue un se- 
creto militar. Se terminó en 1946, y calculó en 
veinte segundos la trayectoria de un proyec- 
til (de la que antes hemos hablado, y cuyo cálcu- 
lo tomaba tres días). La máquina fue envia- 
da a Aberdeen (Maryland), al BRL. Pero ya era 
muy tarde, la guerra había terminado, y dejó 
de pensarse en ella para los cálculos de balís- 
tica. Sin embargo, permaneció en funciona- 
miento hasta 1956, y fue muy útil en el diseño 
de la bomba H. Los cálculos eran larguísimos, 
y las comprobaciones de las distintas hipóte- 
sis tomaban mucho tiempo, Gracias al ENIAC, 
los diseños originales sufrieron cambios y me- 
joras importantes. Para los norteamericanos, 
fue una lástima que el ENIAC no hubiera po- 
dido terminarse antes. Hubieran economizado 
mucho personal y tiempo. En época de guerra, 
el BRL había llegado a contar con un personal 
de hasta trescientas calculistas. 

Al finalizar la guerra, Von Neumann se 
había trasladado de nuevo a Princeton. Estaba 
muy interesado en desarrollar otras máquinas, 
cuya configuración u organización fuera una 
simplificación del cerebro humano. Y con este 
fin, se reunía periódicamente con cientí- 
ficos de otras ramas de la ciencia relaciona- 
das con su proyecto: la neurología y la psiquia- 
tría. El Departamento de Defensa de los Esta- 
dos Unidos le seguía la pista allá donde fuese, 
pues había sido parte fundamental en el pro- 
yecto ENIAC. Y de nuevo, por necesidades 
militares se le asigna otro nuevo proyecto. En 
este caso es la Armada la que se lo ofrece, 
pero luego lo utilizan las Fuerzas Aéreas y la 
Comisión de Energía Atómica. Al igual que en 
otras ocasiones, colaboran en el proyecto em- 
presas civiles que nada tienen que ver con ar- 
mamento, como la RCA, muy interesada por 
entonces por los tubos de vacío. El resultado 
es el IAS, una máquina velocísima y muy efi- 
caz, de cuyas ventajas y problemas hemos ha- 
blado ya en otra ocasión, Este ordenador ter- 
minó pronosticando el tiempo, en un laborato- 
rio meteorológico de la Armada. Pero diseños 
posteriores basados en la misma máquina han 
dado ordenadores tan potentes como el 
ILLIAC IV, fabricado para el Pentágono, y uno 
de los ordenadores más potentes del mundo 
durante muchos años. 


TEMAS MONOGRAFICOS DE VANGUARDIA" 


Los sistemas basados 
en el conocimiento (II) 


XISTEN numerosos paradig- 
mas de representación del 
conocimiento. Hemos visto 
cómo puede utilizarse un es- 
quema basado en las redes 
semánticas, o se puede usar 
una estructura de tripletas 
objeto-atributo-valor 
(O-A-V), o parejas atributo-valor. En relación 
con ellas aparecen con alguna frecuencia los 
llamados marcos de discernimiento o, simple- 
mente, marcos (en inglés "frames”). Por otro 
lado, se utilizan también ampliamente los for- 
malismos de la lógica (tanto lógica de propo- 
siciones como lógica de predicados) para re- 
presentar el conocimiento. De todo ello vamos 
a hablar en las páginas que siguen. 


2 Marcos (“frames”) 


Los marcos son estructuras de datos 
complejas que aportan conocimiento sobre si- 
tuaciones estereotípicas. Los elementos bási- 
cos son los objetos, a los que se vinculan infor- 
maciones con ellos relacionados. En su forma 
más elemental el marco representativo de un 
objeto aporta un conjunto de “casilleros” o "ra- 
nuras” ('slots”), que corresponden a los atribu- 
tos utilizados en las ternas objeto-atributo-va- 
lor (O-A-V). Estas ranuras se "llenan” con los 
valores correspondientes de los atributos. En 
principio, por tanto, parece que un marco no 
aporta demasiado sobre la posibilidad de reu- 
nir varias ternas O-A-V correspondientes a un 
mismo objeto. Sin embargo, el concepto de 
marco es más amplio y supone la fijación de 
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una situación estereotípica (y no sólo un cúmu- 
lo de datos sobre un objeto). Además, se acep- 
ta comúnmente que en cada ranura de un mar- 
co se pueden establecer unos valores "por de- 
fecto”, de aplicación inicial en tanto no se ob- 
tengan otros valores concretos (el número de 
colores del ave se puede fijar "por defecto" en 
1, aunque en el momento de la instanciación 
de un marco aparezca un ave con dos colo- 
res). También es usual incluir en alguna ranu- 
ra referencias ('pointers”) a otras ranuras o a 
otros marcos, conjuntos de reglas aplicables o 
incluso procedimientos. Precisamente esta 
flexibilidad de aportar informaciones y refe- 
rencias variadas en un marco es lo que les ha 
hecho muy utilizados. 


Marco correspondiente a un tipo de ave. 


TEMAS MONOGRAFICOS DE VANGUARDIA 


En el marco presentado en la figura 1, 
a modo de ejemplo, aparece el nombre de re- 
ferencia del marco en la parte superior. La pri- 
mera ranura indica que este marco es una ins- 
tanciación o especialización del marco AVE: 
esto permite obtener las ventajas de "heren- 
cia” en este tipo de representaciones y esta- 
blecer una estructuración entre los diferentes 
marcos. Las ranuras que siguen presentan los 
elementos que componen el marco y sus po- 
sibles valores; en algunas de las ranuras se in- 
dica el tipo de información que ha de incluir- 
se, en otras se da la gama de valores entre los 
que debe estar el valor concreto que "llene" la 
ranura; en una de las ranuras se incluye una 
regla que hace referencia a otra ranura del 
mismo marco; en la última, por fin, se alude a 
un procedimiento incluido en otro marco. 


Como se ve, en un marco está previsto 
incluir informaciones descriptivas (represen- 
tación declarativa de datos) e información de 
procedimientos (representación procedural). 
Este fue uno de los aciertos de Minsky cuan- 
do en 1975 propuso como esquema de repre- 
sentación los marcos: combinar en un solo es- 
quema la representación de tipo procedural 
con la representación declarativa. 


Otra de las ventajas que han hecho que 
la representación del conocimiento en marcos 
se haya extendido tanto es la facilidad de su 
representación en LISP. En efecto, se puede 
establecer fácilmente una “lista de propieda- 
des" tal que la “propiedad” corresponda a la ra- 
nura y el "valor" corresponda al contenido de 
dicha ranura. Posteriormente, en las sucesivas 
y diversas implementaciones de este tipo de 
estructura se ha modificado el esquema bási- 
co-según las necesidades concretas de cada 
caso. 


Existen varios lenguajes específicos 
para la manipulación de los marcos: FRL ("Fra- 
me Representation Language”, "Lenguaje de 
Representación de Marcos”. Poberts y Golds- 
tein, 1977) parte de la organización jerárquica 
de los marcos, lo que comporta relaciones de 
clasificación y generalización; KRL ('Knowled- 
ge Representation Language", "Lenguaje de 
Representación del conocimiento”. Bobrow y 
Winograd, 1977) incluye el concepto de "agen- 
da" para el manejo de los procesos y estable- 
ce cómodos mecanismos de relación de los 
objetos; UNITS, paquete de diseño utilizado 
por el sistema MOLGEN (experimentación ge- 
nética), etc. 
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Guiones (“scripts”) 


Son estructuras genéricas de descrip- 
ción de situaciones (con articulaciones inter- 
nas semejantes a las de los marcos”) que re- 
presentan sucesiones de situaciones tipo. Se 
han utilizado en el análisis de textos y trata- 
miento del lenguaje natural. Una "escena" está 
constituida por campos y contiene acciones 
que evalúan los valores que satisfacen cada 
campo. Existe una fuerte interconexión entre 
los campos debido a la estructura intencional- 
mente secuencial de la descripción. Se inclu- 
yen "planes" que describen en cada escena las 
opciones posibles para conseguir el objetivo 
deseado. 

La descripción de historias mediante 
guiones de este tipo, como base previa al aná- 
lisis de textos, ha sido muy utilizada. 


Expresiones lógicas 


La utilización de expresiones lógicas su- 
pone una aproximación al problema dela re- 
presentación del conocimiento diferente, en 
alguna medida al menos, de las anteriormen- 
te descritas. Mediante la "lógica de proposi- 
ciones” se representan los hechos de un modo 
formalizado en unidades elementales (propo- 
siciones) que sólo pueden adoptar uno de dos 
valores: verdadero o falso; “el avestruz tiene 
dos patas", es un ejemplo de proposición sim- 
ple verdadera. 

Las proposiciones simples se combinan 
entre sí mediante un conjunto de "conectivas” 
muy restringido; se utiliza la conjunción ("Y”, 
su símbolo es *A”), disyunción (“O", símbolo 
“Y”), la negación ("NO", símbolo “— Y) y la im- 
plicación ("IMPLICA”, símbolo "—”). De este 
modo formalizamos expresiones del tipo “el 
avestruz tiene dos patas Y es de color negro 
O es de color blanco" (que simbólicamente se 
escribirá p A (q Y 1), siendo p= "el avestruz 
tiene dos patas”; q = "el avestruz es negra", 1 = 
“el avestruz es blanca”) o bien, *'que el aves- 
truz sea un ave IMPLICA que puede volar” 
(s —>1t, con s= "el avestruz es un ave"; t= "el 
avestruz puede volar”). Como se ve, en el pri- 
mer caso se han combinado en una proposi- 
ción tres afirmaciones (proposiciones simples) 
que pueden corresponder a tres ranuras de 
un marco o a tres arcos de una red semántica, 
afirmando la necesidad (caso del Y) o la op- 
cionalidad (caso del O) de que sean ciertas las 
proposiciones componentes para que lo sea la 


proposición compuesta de todas ellas. En el 
segundo caso, se afirma que el hecho de que 
el avestruz sea un ave supone que tiene la pro- 
piedad de volar como todas las aves; se está 
afirmando la herencia de las propiedades del 
ave (una de ellas, en concreto) por parte del 
avestruz (instancia de la clase "ave”), en vez 
de establecer la relación jerárquica de perte- 
nencia del avestruz a la clase correspondien- 
te. 

En la lógica de proposiciones se mane- 
jan las frases del lenguaje (las proposiciones) 
como unidades completas sin formular (forma- 
lizar) su “contenido interno”: si en vez de con- 
siderar como una unidad la frase "el avestruz 
tiene dos patas" queremos analizar su conteni- 
do, examinaremos que en la frase aparece una 
“propiedad” (tiene dos patas) que se puede re- 
presentar por el símbolo DP (en lógica de pri- 
mer orden se llama “predicado”) y que se afir- 
ma que esa propiedad la tiene el avestruz (lla- 
mémosle “a”). podemos, por tanto, escribir 
—como se suele hacer en matemáticas con las 
funciones— que DP (a) (es decir, que se cum- 
ple "DP" para el elemento "a”). Esto permite 
comparar lo que sucede con otro animal (“b", 
por ejemplo) que también tiene dos patas 
(será verdad, por tanto, que DP (b)), o formu- 
lar más precisamente la frase anterior: en 
efecto, la afirmación “el avestruz tiene dos pa- 
tas" normalmente (dependerá del contexto) se 
referirá no a un avestruz en concreto, sino a 
cualquier avestruz (es decir, es equivalente a 
“todas las avestruces tienen dos patas”), por lo 
que se podría formular como Y x PD (x) ('cual- 
quiera que sea "x" del conjunto de las avestru- 
ces, se cumplirá que DP (x)”) o, incluso, intro- 
duciendo el predicado "ser avestruz" como A 
(x), formalizar Y x(A(x) — DP (x)) (para Cual- 
quier animal el ser avestruz implica tener dos 
patas”). 
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Se pueden formalizar mediante predi- 
cados no sólo propiedades de los elementos 
(como en el caso de A (x) “x es avestruz" o DP 
()) 'x tiene dos patas”), sino relaciones entre 
varios elementos, como cuando escribimos P 
(x,y) 'x es padre de y" o ENTRE (x, y, z) “Xx 
está situado entre y y 2". 

Naturalmente, cada expresión simple 
en lógica de primer orden (con predicados) 
puede ser considerada y tratada como una 
proposición y, por tanto, unida a otras propo- 
siciones mediante las conectivas vistas ante- 
riormente. Por ejemplo, la frase anterior' “el 
avestruz (todas las avestruces) tiene dos patas 
Y es de color negro O de color blanco" puede 
formalizarse como Vx (A (x) —>Dp (3) A(B 
(9) A N (2), haciendo B (x) = "x es blanca”; N 
(x) = 'x es negra”. Como se ve, aparte de los 
predicados que ya conocíamos, los que acaba- 
mos de definir y el “cuantificador universal” 
(Vx) aparecen en la expresión las “conecti- 
vas" =>, A, V uniendo las distintas proposicio- 
nes componentes de la frase total, 

La introducción de la lógica de primer 
orden (este segundo nivel de formalización 
que estamos comentando) con el manejo de 
predicados que indican propiedades o rela- 
ciones, con los símbolos de cuantificación 
(Vx = "para todo x"="cualquiera que sea x” 
y 3 x “existe x" = "hay, al menos, un x que cum- 
ple”) y la utilización de variables que pueden 
tomar valores entre los elementos de un con- 
junto, se puede realizar una formalización de 
las frases del lenguaje natural más próxima a 
la realidad, pero el manejo de estas informa- 
ciones es más complejo. Existen numerosos 
sistemas basados en el conocimiento construi- 
dos con bases de conocimiento formuladas 
en lógica proposicional, pero cada día se van 
extendiendo más los sistemas capaces de ma- 
nejar también lógica de primer orden. 


TERMINOLOGIA 0000 


Algoritmo de concordancia de «rete». Algo- 
ritmo para determinar con eficacia cuáles 
son las reglas que se pueden satisfacer por 
el contenido de la memoria de trabajo, en 
cada ciclo de reconocimiento, consideran- 
do las ligazones entre patrones y datos. Este 
algoritmo aprovecha la redundancia de los 
sistemas de producción, almacenando re- 
sultados parciales del cómputo de la con- 
cordancia, de forma que no necesitan vol- 
ver a computarse más tarde. Fue desarro- 
llado por Charles L. Forgy y le puso este 
nombre porque se utiliza en inglés una pa- 
labra antigua «rete», que significa «red» 
(aunque la palabra usual hoy en día sea 
«Nnetwork»). 


Arbol de comprobaciones. Estructura de da- 

- tos en forma de árbol, en la que el nodo raíz 
representa el teorema que debe ser proba- 
do, y los nodos hijos los teoremas que una 
vez comprobados bastarán para probar el 
teorema padre. Los árboles de comproba- 
ciones pueden ser árboles and/or. 


Asociación (—binding). Asociación entre una 
variable y un valor para esa variable que se 
mantiene dentro del alcance de una regla, 
una llamada a la función, o la llamada a un 
procedimiento. Se llama también «ligadura». 


BNF. Siglas de Backus-Naur. Form. (Ver For- 
ma Backus-Naur.) 


Cálculo de predicados. Lenguaje formal de 
la lógica clásica que utiliza funciones y pre- 
dicados para describir las relaciones entre 
entidades individuales. 


Ciclo. Cada paso de iteración de un bucle. En 


sistemas de producción, una ejecución está 
formada por ciclos de actos de reconoci- 
miento reiterados. En el algoritmo de con- 
cordancia de Rete, los ciclos de concordan- 
cia tienen lugar cada vez que se añade o se 
elimina un elemento de la memoria de tra- 
bajo. : 

En sistemas de activación difundida, la 
activación se propaga de forma incremen- 
tal durante las series de ciclos de activa- 
ción. 


Cláusula de Horn. En programación lógica, 


las cláusulas de Horn son expresiones uni- 
das por «or» con, al menos, una proposición 
positiva. Así, una cláusula de Horn tiene la 
forma siguiente «No AoNoBo..oNoCo 
D». La programación lógica se realiza con 
una mayor eficacia restringiendo el tipo de 
aserciones lógicas a cláusulas de Horn, del 
mismo modo que los sistemas de produc- 
ción exigen normalmente disponer del co- 
nocimiento en forma de reglas si-entonces. 


Contexto. Un estado, dentro del proceso de 
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resolución del problema. En un sistema de 
producción, se puede representar el con- 
junto por un elemento de la memoria de tra- 
bajo específico, al que se designa con fre- 
cuencia con el nombre del elemento del 
contexto o elemento de control o subobjeti- 
vo. Es frecuente que las tareas aislables que 
deban realizar los sistemas de producción 
puedan partirse en subtareas que una vez 
iniciadas puedan ejecutarse hasta comple- 
tarse. 


Las reglas que constituyen esta tarea 
tienen cada una de ellas elementos de con- 
dición que deben concordar con el elemen- 
to de contexto asociado. 


Disparar. Ejecutar el conjunto de acciones es- 
pecificadas en el lado derecho de una regla 
o instanciación. Este término deriva de la 
neurofisiología, ya que se dice que las neu- 
ronas se «disparan» cuando generan una ac- 
ción. 

Forma Backus-Naur. Lenguaje formal para 
expresar gramáticas de contexto libre. Una 
gramática es un conjunto de reglas de so- 
breescritura, cada una de las cuales dispo- 
ne de un lado izquierdo y un lado derecho, 
separados por el símbolo de metalenguaje : 
:=, El lado izquierdo de cada regla es un 
símbolo no terminal de la gramática, y el 
lado' derecho es una secuencia de símbolos 
no terminales y terminales. Los símbolos no 
terminales suelen aparecen entre los símbo- 
los <>, 

Algunas versiones ampliadas de la For- 
ma Backus-Naur incluyen símbolos de meta- 
lenguaje adicionales para indicar la repeti- 
ción y la alteración. Este lenguaje lleva su 
nombre debido a John Backus y Peter Naur, 
que fueron los introductores de esta forma 
de descripción general del lenguaje de pro- 
gramación ALGOL -60, 


Fuentes de conocimiento concurrentes. En 
un sistema experto, módulos especializados 
que analizan los datos independientemente, 
y se comunican a través de una base de da- 
tos central, llamada generalmente «pizarra». 


Gramática de contexto libre. Gramática para 
describir un lenguaje de contexto libre. 
Como metalenguaje para expresar una gra- 
mática de contexto libre podemos citar la 
Forma Backus Naur. 


Inferencia. Derivación de una proposición a 
partir de otras proposiciones. Se puede or- 
ganizar una serie más o menos compleja de 
inferencias para llegar, desde unas propo- 
siciones antecedentes dadas, hasta unas 
consecuencias, mediante un proceso deno- 
minado de encadenamiento hacia adelante, 
o de inferencia dirigida por los datos; o bien 
se puede comenzar a partir de la especifi- 
cación de las conclusiones que se desean 
obtener, y retroceder intentando probar los 
antecedentes que las justifiquen, según un 
proceso que se llama de «encadenamiento 
hacia atrás», o de inferencia dirigida por un 
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modelo, o también inferencia controlada por 
los objetivos. 


Intérprete de reglas. En los sistemas de pro- 
ducción, otra denominación de intérprete, 


Líneas múltiples de razonamiento. En reso- 
lución de problemas, técnica en la que se 
desarrollan en paralelo varios sistemas in- 
dependientes de resolución del problema. 


Lógica. Es un sistema que prescribe reglas 
para manipular símbolos. Muchos sistemas 
lógicos tienen potencia suficiente para ma- 
nipular estructuras del conocimiento que in- 
cluyen cálculo proposicional «y cálculo de 
predicados. 


Lógica difusa. Modelo desarrollado para rea- 
lizar razonamientos aproximados, en el cual 
los valores de verdad y los cuantificadores 
se definen como distribuciones de probabi- 
lidades, con etiquetas lingúísticas, como, 
por ejemplo, verdadero, muy verdadero, no 
muy verdadero, bastantes, pocos y varios. 
Las reglas de inferencia son aproximadas 
en lugar «de ser exactas, para mejor mani- 
pular la información que es incompleta, im- 
precisa o inconcreta, 


Métodos basados en reglas. Métodos de pro- 
gramación que realizan los encadenamien- 
tos hacia adelante y hacia atrás utilizando 
reglas SI ENTONCES. 


Modelo de sistema de producción. Estilo de 
programación y resolución de problemas, 
caracterizado por una arquitectura de siste- 
mas de producción. Otros modelos usuales 
son la programación procedural (por ejem- 
plo, en PASCAL), programación simbólica 
(LISP), programación lógica (PROLOG) y 
programación orientada al objeto (SMALL- 
TALK). 

Monotónico. Unidireccional. En análisis, una 
función monotónica es aquella que o no se 
incrementa (sólo se mantiene y/o decre- 
menta), o no se decrementa (sólo crece o se 
mantiene). En inferencias, una lógica mono- 
tónica sólo puede añadir proposiciones a 
una base de conocimientos, y no puede ja- 
más eliminarlos. 


Nodo de producción. Nodo especial de la red 
de algoritmos de concordancia de Rete que 
asocia una regla con el conjunto de nodos 
que comprueban si las condiciones de di- 
cha regla han sido satisfechas. 

Programa de un sistema de producción. Pro- 
grama de aplicación escrito en un lenguaje 


TERMINOLOGIA 


de sistema de producción y en el que la ma- 
yor parte del problema se lleva a cabo dis- 
parando las reglas. 


Red de inferencias. Todas las posibles cade- 
nas pueden ser generadas por las reglas, en 
un sistema basado en reglas. 


Regla de producción. Es el tipo de regla que 
se utiliza en un sistema de producción. Ge- 
neralmente se expresa como SI condición 
ENTONCES acción. 


Sistema de producción. Arquitectura para la 
resolución de problemas, que emplea un 
conjunto de reglas (almacenadas en la me- 
moria de producción), una base de datos 
global (almacenada en la memoria de datos) 
y un motor de inferencia que realiza el ci- 
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clo' de reconocimiento de concordancias, 
resolución de conflictos y disparo de una re- 
gla. 


Valores por defecto. Los programas de orde- 
nador suelen utilizar ciertos valores prees- 
pecificados que utilizan, si no toman otros 
valores alternativos. A estos valores «su- 
puestos» se les denomina valores por defec- 
to. Los sistemas del conocimiento suelen al- 
macenar valores por defecto, para utilizar 
en lugar de hechos. Como ejemplo, citemos 
un programa médico que supone que un pa- 
ciente ha estado expuesto a la acción de un 
organismo determinado, si el usuario no in- 
dica que dicha exposición queda descar- 
tada. 


VOCABULARIO DE INFORMATICA 


Polares, coordenadas. (Ver Coordenadas 
polares). ; 


Polling. Término inglés que significa escru- 
tinio, sondeo. En Informática puede referir- 
se á una técnica para identificar qué peri- 
férico ha enviado al ordenador la señal de 
interrupción. También puede referirse a los 
«sondeos» periódicos entre terminales que 
utilizan una única línea de comunicación 
para ver cuál es el que debe obtener servi- 
cio. 


Poner a cero. Se refiere a dar valores cero 


a las variables que son numéricas, y valor 
nulo a las variables de cadena. Si se trata 
de variables gráficas, la puesta a cero con- 
sistirá en que tomen el color de fondo, y si 
se trata de blanco y negro, que tomen como 
valor el negro. 


Port. Término inglés que significa puerto. En 
Informática indica un canal de acceso a al- 
gún dispositivo, al que están unidos los ele- 
mentos de entrada/salida. Está gobernado 
por el procesador central, utilizando para 
designarlo una dirección de la memoria que 
depende de la organización característica 
de cada ordenador. También puede desig- 
narse como puerta. (Véase Puerta serie y 
Puerta paralelo). 


Posibilidad de traslado. Posibilidad de 


reubicar un programa (escrito generalmen- 
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te en lenguaje máquina) en otras posiciones 
de la memoria central. Por esta razón, las 
instrucciones del programa no contienen di- 
recciones de memoria absolutas, sino defi- 
nibles en el momento de la ejecución del 
programa. 


Posición. En una cadena, cada espacio sus- 
tituible por un valor, que debe estar ocupa- 
do por un carácter o dígito binario, y que 
puede ser identificada por un número. 


Posición de memoria. Celdilla hipotética 
de la memoria central (representada por su 
dirección), que contiene un dato, o parte de 
una instrucción o una instrucción completa 
de máquina. En Informática, los términos po- 
sición, ubicación, palabra y celda son sinó- 
nimos. 


Posicional, notación. Sistema de numera- 
ción en el que los números se representan 
mediante un conjunto ordenado de dígitos, 
de tal forma que el valor por cada dígito de- 
pende de su posición, además de depender 
de su valor. Sinónimo de representación po- 
sicional. 


Potencia. En física, número de watios con- 
equipo, más coloquialmente, 
mática, de forma algo informal, indica la di- 
mensión y posibilidades de un determinado 
equipo, más coloquialmente. 


VOCABULARIO DE INFORMATICA? 


Power. Término inglés que significa poten- 
cia. Puede referirse a la operación aritméti- 
ca de elevación a potencias, o en física o 
electrónica a la alimentación eléctrica. 


Power failure. Término inglés para indicar 
la caída de tensión. 


Power supply. Término inglés para desig- 
nar a la «fuente de alimentación»: un dispo- 
sitivo general de alimentación de un apara- 
to eléctrico o electrónico. Normalmente, la 
«fuente» convierte la tensión alterna que re- 
cibe de la red en tensión continua, adecua- 
da para la alimentación de los circuitos de 
los dispositivos electrónicos. 


Precisión. Término que indica el grado de 
acercamiento de un valor al valor teórico. 
Las precisiones elevadas suponen márge- 
nes de error pequeños, siendo el error la di- 
ferencia entre el valor teórico y el valor ob- 
tenido por otros medios cualesquiera. Es 
frecuente confundir la precisión con la 
aproximación, que indica, por el contrario, 
el grado de discriminación con la que se in- 
dica una cantidad. Por ejemplo, un número 
de tres dígitos discrimina entre 1.000 posibi- 
lidades. 


Preset. Término inglés que indica establecer 
una condición inicial, como, por ejemplo, los 
valores de control de un bucle. 


Primitiva. Instrucción básica de un lenguaje 
o de un sistema operativo mediante la cual 

- se pueden formular otras instrucciones más 
complejas. 


Printer. Impresora. 

Printout. Salida de impreso. 

Prioridad. Criterio de disquisición, dentro 
de una escala jerárquica. Puede referirse a 
rutinas y programas o a distintos usuarios 
que utilizan un mismo ordenador. 

Probabilidad. Posibilidad contabilizada de 
que se produzca un determinado suceso, 
dentro de un conjunto de sucesos posibles. 


Procedimiento. Secuencia sistemática de 


operaciones para producir un resultado es- 
pecífico. 


Procesador. Dispositivo diseñado para des- 
empeñar distintas funciones sobre los da- 
tos. Los ordenadores disponen de varios 
procesadores que son los que realizan las 
distintas funciones concretas (unidad arit- 
mético-lógica, unidad de entrada/salida, 
etcétera). Este término hace alusión a que 
los ordenadores no sólo «calculan» utilizan- 
do para ello números, sino que «procesan» 
todo tipo de datos. 


Procesador de texto. Programa que se uti- 
liza con el fin de obtener textos bien escri- 
tos y bien presentados, facilitanto al máxi- 
mo las tareas necesarias para ello. Punda- 
mentalmente modifica, escribe, transforma 
textos escritos en lenguaje natural, de for- 
ma fácil y sencilla. 


Proceso. Operaciones desarrolladas por uno 
o varios procesadores para ejecutar un pro- 
grama. 


Proceso predefinido. Proceso que se iden- 
tifica únicamente por su nombre, y que está 
definido en algún otro lugar. 


Producto lógico. Sinónimo de la operación 
lógica AND. 


Programa. Serie de instrucciones propues- 
tas en forma de lista para obtener un resul- 
tado concreto. A las distintas partes de un 
programa general o a los programas peque- 
ños se les puede llamar también informal- 
mente rutinas. Puede definirse como la ela- 
boración de un algoritmo utilizando para 
ello un lenguaje de ordenador. Los progra- 
mas son ejecutables inmediatamente por el 
ordenador si están escritos en lenguaje má- 
quina. Si están escritos en algún lenguaje de 
nivel más alto, deberán ser traducidos a len- 
guaje máquina por un intérprete o compila- 
dor. 


Programa fuente. Programa escrito en un 
lenguaje de alto nivel o en ensamblador, an- 
tes de su compilación o ensamblaje. 


Programa objeto. Programa que se obtiene 
compilando .o ensamblando un programa 
escrito en un lenguaje de alto nivel, como 
COBOL o FORTRAN. Es un programa ejecu- 
table inmediatamente, ya que las instruccio- 
nes están escritas en lenguaje máquina. En 
ocasiones no es ejecutable inmediatamente, 
sino que debe ser tratado por un Linker, 
para unir el programa principal a las subru- 
tinas, o por un Loader, para cargarlo en la 
memoria principal del ordenador. 


Programa principal. Término utilizado en 


contraposición a Subrutina, que es un pe- 
queño programa que depende del progra- 
ma principal. 


Programación. Diseño, escritura y compro- 
baciones de un programa. 


Programación automática. Utilización de 
un ordenador para llevar a cabo algunas de 
las etapas de preparación de un programa. 


Programación convexa. En investigación 
operativa, caso particular de programación 
no lineal en la que la función que se va a 
maximizar o minimizar y sus ligaduras son 
funciones adecuadamente convexas o cón- 
cavas de las variables. En contraposición 
con programación dinámica, lineal, mate- 
mática o cuadrática. 


Programación cuadrática. En investiga- 
ción operativa, caso particular de la progra- 
mación no lineal en la que la función que se 
va a maximizar o minimizar y las ligazones 
son funciones cuadráticas de las variables 
controlables. 


Programación dinámica. En investigación 
operativa, procedimiento de optimización 
de la solución de un problema multietapas, 
en el que se pueden tomar un cierto núme- 
ro de decisiones en cada etapa del proce- 
so. En contraposición con programación 
convexa, lineal, matemática o cuadrática. 


Programación estructurada. Técnica de 
programación que permite escribir progra- 
mas fácilmente legibles, autoexplicativos, 
fácilmente modificables, y con la documen- 
tación adecuada. Cuando los programas se 
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hacían tan complejos y difíciles de com- 
prender que los propios autores apenas si 
sabían lo que habían escrito, comenzó a ha- 
cerse necesario estructurarlos adecuada- 
mente. Estos programas estructurados sue- 
len estar formados por módulos sencillos y 
bien definidos, Este sistema puede utilizar- 
se para escribir un programa en cualquier 
lenguaje de programación, aunque los len- 
guajes más modernos tienen características 
más adecuadas para este sistema de pro- 
gramación. El más adecuado es el Pascal, 
que prácticamente obliga a programar es- 
tructuralmente. 


Programación lineal. En investigación ope- 
rativa, procedimiento para localizar el máxi- 
mo o mínimo de una función lineal con va- 
riables sujetas a ligaduras lineales. Este tér- 
mino. es sinónimo de optimización lineal. 


Programación matemática. En investiga- 
ción operativa, procedimiento para obtener 
el máximo o mínimo de una función sujeta a 
ciertas ligaduras. En contraposición a pro- 
gramación convexa, dinámica, lineal y cua- 
drática. 


Programación no lineal. En investigación 
operativa, procedimiento para obtener el 
máximo o mínimo de una función cuyas va- 
riables están sujetas a ataduras, y la función, 
o las ligaduras o ambas cosas no son linea- 
les. En contraposición a programación con- 
vexa, dinámica, lineal, matemática o cua- 
drática. 


PROM (Programmable Read Only Me- 
mory). (Término inglés que significa Me- 
moria Programable de Sólo Lectura). Tipo 
de memoria ROM, cuyo contenido puede 
ser grabado por el usuario. 


Prompt. Término inglés que significa en in- 
formática un pequeño mensaje o indicación, 
que utiliza el ordenador o un lenguaje para 
avisar de alguna situación especial. El cur- 
sor puede ser considerado como un 
«prompt», una interrogación, en ciertos len- 
guajes puede indicar que el ordenador está 
esperando que el usuario debe introducir 
datos, o incluso mensajes más largos, indi- 
cando el tipo de problema o indicación ade- 
cuada. 


VOCABULARIO DE INFORMATICA 


Protección. Existen muchos tipos de protec- 
ción. Puede referirse a protección frente a 
sobreescribir sobre alguna de las memo- 
rias, cuando no debía haberse hecho. Se in- 
tenta evitar la pérdida de información debi- 
da a errores. Los métodos de protección 
pueden ser de dos tipos, de hardware y de 
software. Los métodos de hardware son mu- 
chos: muescas en discos, pasadores, o, en 
los discos rígidos, pulsando en un interrup- 
tor situado en la unidad de disco. Las pro- 
tecciones de software se realizan introdu- 
ciendo instrucciones de control en el pro- 
grama, que controlen la escritura. Pueden 
introducirse en la creación del fichero, o 
mediante ciertos comandos. 


Protocolo. En comunicaciones, para que la 
transmisión «tenga algún sentido» los dispo- 
sitivos deben comunicarse entre sí según 
criterios normalizados generalmente por 
Organismos Internacionales. Al conjunto de 
estas normas o criterios se le denomina Pro- 
tocolo, 


Pseudoaleatorios, secuencia de núme- 
ros. Secuencia de números, obtenida por 
un proceso aritmético definido, y que es sa- 
tisfactoriamente aleatorio para algún propó- 
sito, como por ejemplo, satisfacer una prue- 
ba determinada de números aleatorios. 


Pseudocódigo. Código que requiere ser tra- 
ducido antes de su ejecución. 


Puerta. Parte de un circuito a través de la que 
se realiza la .entrada o salida de los datos. 
Puerto. Dispositivo de un ordenador al que 
están unidos los elementos de entrada y sa- 
lida. El procesador central controla los 
puertos direccionándolos mediante una di- 
rección de memoria o mediante un número 
lógico, dependiendo de la organización es- 

pecífica de cada ordenador. 


Puerto paralelo. Dispositivo en el que los 
datos entran y salen en paralelo. Se trans- 

' miten simultáneamente varios bits por di- 
versos canales (los ocho bits de un byte, por 
ejemplo). 


Puerto serie. Dispositivo en el que los datos 
entran y salen secuencialmente, existiendo 
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un único canal por el que se transmite un 
solo bit cada vez. 


Puesto de trabajo. Suele utilizarse también 
con frecuencia el término inglés worksta- 
tion. Indica el lugar donde se realizan las ta- 
reas con el ordenador, o algún tipo de dis- 
positivo periférico. 


Puntero. También puede llamarse indicador, 
Es un valor numérico que se utiliza como di- 
rección para un elemento. Por ejemplo, un 
puntero puede ser un determinado registro 
que contiene la información sobre el regis- 
tro siguiente que se va a procesar (y que no 
tiene por qué ser el contiguo a él). 


Puntero de una pila. Es un puntero utiliza- 
do para indicar el último elemento introdu- 
cido en la pila, que será el primero en salir 
(sistema LIFO: last in first out; último en lle- 
gar, primero en salir). 


Punto a punto. En comunicaciones, conexión 
directa entre dos o más puntos. 


Punto de entrada. Suele usarse para indicar 
la dirección donde comienza una determi- 
nada rutina, o una tabla (primer elemento 
de la tabla). 


Quadratic programming. Véase progra- 
mación cuadrática. 


Qualified name. Nombre cualificado. Térmi- 
no inglés que indica un nombre de un dato 
que va acompañado de especificaciones 
correspondientes a la clase a la que perte- 
nece, dentro de un sistema de clasificación 
determinado. 


Quantization. Cuantificación. Término in- 
glés que indica una subdivisión de una 
gama de valores de una variable en un nú- 
mero finito de intervalos, no necesariamen- 
te iguales. Estos intervalos suelen indicarse 
mediante uno de sus valores. 


Quantization error. Error de cuantificación. 
Error producido en la conversión de una se- 
ñal analógica en digital. Como esta última 
tiene un número finito de valores, puede 
ocurrir que no se correspondan siempre 
con exactitud con el valor obtenido en un 
instante dado para la señal analógica. 


Quantum. Dentro de una cuantización, un sub- 
orden. 


Query. Término inglés que significa consul- 
ta, pregunta. 


Queue. Término inglés que significa cola. Se 
refiere a un conjunto de elementos organi- 
zados en una cola en espera de ser procesa- 
dos. 


Quick reference. Término inglés que signi- 
“fica referencia rápida. Suele referirse a una 
tabla de consulta de instrucciones coman- 
dos, códigos, etc., o a un diccionario. 


Quiescing. Proceso por el cual se detiene un 
sistema multiprogramado por el rechazo de 
nuevas tareas. 


Quinario. También llamado biquinario. Nota- 
ción en la cual cada dígito decimal que se 
va a representar se considera como suma 
de dos dígitos de los cuales el primero pue- 
de ser cero o uno, con un peso de cinco y 
el segundo puede ser 0, 1, 2, 3, ó 4, con peso 
de uno: de este modo, un 7 (decimal) se pue- 
de representar como 12, un 9 (decimal) 
como 14, y un 4 (decimal) como 04. 


Quisam. Método de acceso a colas, que es se- 
cuencial, y además indexado. 


Quit. Término inglés que significa abandonar. 
Puede referirse a abandonar una determi- 
nada tarea y volver al programa anterior, o 
simplemente a abandonar la tarea, el fiche- 
ro, etc. Es usual que sea este término el que 
se utilice como nombre del comando que 
realiza la tarea de cerrar y abandonar una 

-aplicación o proceso. 


Qwerty, teclado. Uno de los esquemas más 
utilizados de disposición de las teclas de un 
teclado, Es el standard de las máquinas de 
escribir y el más extendido en los ordena- 
dores electrónicos. Lleva este nombre como 

.referencia a las letras que aparecen en las 
primeras seis teclas de la primera fila (co- 
menzando por la izquierda). 


Radian. Unidad de medida de ángulos. 360 
grados equivalen a 2 pi radianes. Para pa- 
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sar de radianes a grados basta con aplicar 
la fórmula siguiente: 
radianes = grados x (3,1416/180) 


Radix. Palabra inglesa que designa la raíz, 
Ver raíz. 


Raíz. En un sistema de numeración, entero 
por el que debe multiplicarse la cifra de un 
número si se desea obtener su rango. Tam- 
bién se puede designar a la raíz como base. 
En informática, las raíces o bases de siste- 
ma de numeración más utilizadas son la,bi- 
naria, hexadecimal, y antiguamente, la deci- 
mal. y 


RAM. Random Access Memory-Memoria de 
Acceso Aleatorio. Memoria en la que se 
puede acceder directamente a cada uno de 
sus elementos. En contraposición a memo- 
rias secuenciales, en las que para acceder 
a un elemento, es necesario pasar por todos 
los anteriores o posteriores a él. Suele lla- 
marse de forma coloquial memoria RAM a 
las memorias lectura/escritura en contrapo- 
sición a las memorias ROM de sólo lectura. 


Random access. Término inglés para indi- 
car un acceso aleatorio. El acceso aleatorio 
a un dispositivo es independiente de la po- 
sición del dato que se desea inspeccionar, 
y del último inspeccionado. 


Recurso. Medio disponible para desarrollar 
alguna tarea. Puede tratarse de máquinas, 
herramientas de algún tipo, energía, mate- 
rías primas, cualquier elemento que nos sir- 
va para alcanzar el objetivo. El ordenador 
pone a nuestro alcance unos recursos, entre 
los que citaremos la memoria, unidad arit- 
mética, etc. El sistema operativo es el que 
gestiona el uso de los recursos. 


Red. Conjunto de dispositivos unidos unos a 
otros por algún medio. En informática se tra- 
ta de una red de ordenadores o periféricos, 
unidos unos a otros con el fin de realizar de- 
terminadas tareas. 


Redondeo. Aproximación de un número. Se 
redondea las cifras menos significativas eli- 
minando la última cifra y añadiendo una uni- 
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dad a la penúltima cifra (redondeo por ex- 
ceso), o bien eliminando la última cifra y de- 
jando el resto tal cual (redondeo por defec- 
to). No hay que confundir el redondeó con 
el truncamiento, que consiste en eliminar 
las cifras decimales que se considere, sin 
más. 


Registro. Uno de los elementos constitutivos 
de un fichero. Los registros, a su vez, están 
divididos en campos. Puede referirse a un 
registro físico, tratándose en este caso de 
un grupo de datos, que se transfieren en 

bloque a la memoria de masa, (sinónimo de 
bloque o sector). Estos registros físicos son 
controlados directamente por el sistema 
operativo. También puede ser un registro 
logico, en cuyo caso se trata de datos de un 
programa que están organizados formando 
un bloque dentro del programa. Los regis- 
tros lógicos se pueden controlar mediante 
instrucciones. 

Otra acepción de registro absolutamente 
distinta de las anteriores: se refiere a un cir- 
cuito electrónico que sirve para almacenar 
de forma rápida datos de volumen muy re- 
ducido (8, 16 ó 32 bits). Los registros son una 
de las partes más dinámicas del ordenador. 
Entre ellos cabe citar al indicador de pila, 
registro de estado, contador de programa, 
etcétera. 

Es importante indicar que los registros que 
hemos indicado primero se llaman en inglés 
records. El segundo tipo de registros de 
hardware se llaman en inglés registers. 
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Registro de estado. Registro de hardware 
situado en la Unidad Central de proceso, y 
cuyo cometido consiste en indicar algunas 
de las situaciones más importantes que se 
producen durante un proceso en el ordena- 
dor. Puede indicar, por ejemplo, si se pro- 
duce un arrastre de una operación, si ésta 
es cero, si se intenta superar la capacidad 
máxima de memoria disponible, etcétera. 


Registro índice. Registro situado en la Uni- 
dad Central de proceso, que permite calcu- 
lar direcciones absolutas de la memoria. 
Para obtener la dirección, se toma el valor 
indicado en el registro y se le suma un des- 
plazamiento relativo. 


Relativa, codificación. Codificación que 
utiliza instrucciones máquina con direccio- 
nes relativas. 


Relativa, dirección. La dirección relativa 
se obtiene restando de la dirección absolu- 
ta la dirección base. 


Reliability. Término inglés que significa fia- 
bilidad, es decir indica la probabilidad de 
que un dispositivo funcione sin fallos duran- 
te un período específico de tiempo. 


Relocalizar. En programación, mover una 
rutina de una posición de almacenamiento, 
a otra, y ajustar las referencias de direccio- 
namiento de forma que la rutina pueda eje- 
cutarse en su nueva posición. 


